home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: HyperCard Stack
(archive/hypercard).
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| dexvert
| HyperCard Stack (archive/hypercard)
| magic
| Supported |
1%
| dexvert
| PageFocus Data (other/pageFocusData)
| ext
| Unsupported |
1%
| dexvert
| Banyans VINES patch data (other/banyansVINESPatchData)
| ext
| Unsupported |
100%
| file
| data
| default
| |
100%
| TrID
| HyperCard Stack
| default
| |
100%
| siegfried
| fmt/1490 HyperCard Stack
| default
|
|
id metadata |
---|
key | value |
---|
macFileType | [STAK] |
macFileCreator | [WILD] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 1c 00 53 54 41 4b | ff ff ff ff e7 e8 ba ff |....STAK|........|
|00000010| 00 00 00 08 00 00 ac 00 | 00 00 1c 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 04 | 00 00 0c e5 00 00 00 06 |........|........|
|00000030| 00 00 0f 5a 00 00 19 e1 | 00 00 00 00 00 00 00 00 |...Z....|........|
|00000040| 00 00 08 bf 00 00 00 00 | 00 05 00 00 10 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 01 20 80 00 | 01 20 80 00 01 20 80 00 |..... ..|. ... ..|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|000002d0| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|000002e0| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|000002f0| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000300| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000310| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|00000320| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|00000330| c4 80 0c 68 43 02 30 26 | b1 30 03 1b d8 c0 0c 8d |...hC.0&|.0......|
|00000340| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|00000350| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|00000360| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|00000370| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000380| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000390| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|000003a0| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|000003b0| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|000003c0| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|000003d0| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|000003e0| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|000003f0| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 6f 6e 20 6f 70 65 6e 53 | 74 61 63 6b 0d 67 6c 6f |on openS|tack.glo|
|00000610| 62 61 6c 20 64 6f 6c 6c | 61 72 73 41 6e 64 43 65 |bal doll|arsAndCe|
|00000620| 6e 74 73 2c 75 6e 69 74 | 46 6f 72 6d 61 74 2c 6c |nts,unit|Format,l|
|00000630| 65 61 64 69 6e 67 5a 65 | 72 6f 73 2c c2 0d 70 72 |eadingZe|ros,..pr|
|00000640| 69 6e 74 69 6e 67 49 6e | 76 6f 69 63 65 2c 66 69 |intingIn|voice,fi|
|00000650| 6e 64 4d 6f 64 65 2c 64 | 65 6c 65 74 65 46 6c 61 |ndMode,d|eleteFla|
|00000660| 67 2c 63 68 61 6e 67 65 | 64 49 6e 76 6f 69 63 65 |g,change|dInvoice|
|00000670| 2c 6e 65 77 49 6e 76 6f | 69 63 65 2c c2 0d 74 6f |,newInvo|ice,..to|
|00000680| 6f 6c 57 69 6e 64 6f 77 | 4c 6f 63 2c 74 65 73 74 |olWindow|Loc,test|
|00000690| 56 65 72 73 69 6f 6e 2c | 73 61 76 65 64 4c 65 76 |Version,|savedLev|
|000006a0| 65 6c 0d 70 75 74 20 22 | 30 2e 30 30 22 20 69 6e |el.put "|0.00" in|
|000006b0| 74 6f 20 64 6f 6c 6c 61 | 72 73 41 6e 64 43 65 6e |to dolla|rsAndCen|
|000006c0| 74 73 0d 70 75 74 20 22 | 30 22 20 69 6e 74 6f 20 |ts.put "|0" into |
|000006d0| 75 6e 69 74 46 6f 72 6d | 61 74 0d 70 75 74 20 22 |unitForm|at.put "|
|000006e0| 30 30 30 30 30 30 22 20 | 69 6e 74 6f 20 6c 65 61 |000000" |into lea|
|000006f0| 64 69 6e 67 5a 65 72 6f | 73 0d 70 75 74 20 66 61 |dingZero|s.put fa|
|00000700| 6c 73 65 20 69 6e 74 6f | 20 70 72 69 6e 74 69 6e |lse into| printin|
|00000710| 67 49 6e 76 6f 69 63 65 | 0d 70 75 74 20 66 61 6c |gInvoice|.put fal|
|00000720| 73 65 20 69 6e 74 6f 20 | 66 69 6e 64 4d 6f 64 65 |se into |findMode|
|00000730| 0d 70 75 74 20 65 6d 70 | 74 79 20 69 6e 74 6f 20 |.put emp|ty into |
|00000740| 64 65 6c 65 74 65 46 6c | 61 67 0d 70 75 74 20 66 |deleteFl|ag.put f|
|00000750| 61 6c 73 65 20 69 6e 74 | 6f 20 63 68 61 6e 67 65 |alse int|o change|
|00000760| 64 49 6e 76 6f 69 63 65 | 0d 70 75 74 20 66 61 6c |dInvoice|.put fal|
|00000770| 73 65 20 69 6e 74 6f 20 | 6e 65 77 49 6e 76 6f 69 |se into |newInvoi|
|00000780| 63 65 0d 70 75 74 20 66 | 61 6c 73 65 20 69 6e 74 |ce.put f|alse int|
|00000790| 6f 20 74 65 73 74 56 65 | 72 73 69 6f 6e 0d 70 75 |o testVe|rsion.pu|
|000007a0| 74 20 6c 6f 63 20 6f 66 | 20 74 6f 6f 6c 20 77 69 |t loc of| tool wi|
|000007b0| 6e 64 6f 77 20 69 6e 74 | 6f 20 74 6f 6f 6c 57 69 |ndow int|o toolWi|
|000007c0| 6e 64 6f 77 4c 6f 63 0d | 70 75 74 20 74 68 65 20 |ndowLoc.|put the |
|000007d0| 75 73 65 72 4c 65 76 65 | 6c 20 69 6e 74 6f 20 73 |userLeve|l into s|
|000007e0| 61 76 65 64 4c 65 76 65 | 6c 0d 73 65 74 20 74 68 |avedLeve|l.set th|
|000007f0| 65 20 75 73 65 72 4c 65 | 76 65 6c 20 74 6f 20 34 |e userLe|vel to 4|
|00000800| 0d 68 69 64 65 20 6d 65 | 6e 75 62 61 72 0d 63 68 |.hide me|nubar.ch|
|00000810| 6f 6f 73 65 20 62 72 6f | 77 73 65 20 74 6f 6f 6c |oose bro|wse tool|
|00000820| 0d 65 6e 64 20 6f 70 65 | 6e 53 74 61 63 6b 0d 0d |.end ope|nStack..|
|00000830| 66 75 6e 63 74 69 6f 6e | 20 67 65 6e 65 72 69 63 |function| generic|
|00000840| 46 69 6e 64 20 73 65 61 | 72 63 68 53 74 72 69 6e |Find sea|rchStrin|
|00000850| 67 2c 73 65 61 72 63 68 | 46 69 65 6c 64 2c 66 69 |g,search|Field,fi|
|00000860| 72 73 74 43 61 72 64 2c | 6c 61 73 74 43 61 72 64 |rstCard,|lastCard|
|00000870| 0d 2d 2d 20 66 69 6e 64 | 20 69 74 65 6d 20 6f 6e |.-- find| item on|
|00000880| 6c 79 20 69 6e 20 67 69 | 76 65 6e 20 66 69 65 6c |ly in gi|ven fiel|
|00000890| 64 20 69 6e 20 67 69 76 | 65 6e 20 72 61 6e 67 65 |d in giv|en range|
|000008a0| 20 6f 66 20 63 61 72 64 | 73 0d 73 65 74 20 63 75 | of card|s.set cu|
|000008b0| 72 73 6f 72 20 74 6f 20 | 62 75 73 79 0d 70 75 74 |rsor to |busy.put|
|000008c0| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 74 | the num|ber of t|
|000008d0| 68 69 73 20 63 61 72 64 | 20 69 6e 74 6f 20 73 74 |his card| into st|
|000008e0| 61 72 74 43 61 72 64 0d | 70 75 74 20 65 6d 70 74 |artCard.|put empt|
|000008f0| 79 20 69 6e 74 6f 20 66 | 6f 75 6e 64 43 61 72 64 |y into f|oundCard|
|00000900| 0d 70 75 74 20 65 6d 70 | 74 79 20 69 6e 74 6f 20 |.put emp|ty into |
|00000910| 66 69 72 73 74 46 69 6e | 64 0d 73 65 74 20 6c 6f |firstFin|d.set lo|
|00000920| 63 6b 53 63 72 65 65 6e | 20 74 6f 20 74 72 75 65 |ckScreen| to true|
|00000930| 0d 72 65 70 65 61 74 20 | 66 6f 72 65 76 65 72 0d |.repeat |forever.|
|00000940| 73 65 74 20 63 75 72 73 | 6f 72 20 74 6f 20 62 75 |set curs|or to bu|
|00000950| 73 79 0d 66 69 6e 64 20 | 73 65 61 72 63 68 53 74 |sy.find |searchSt|
|00000960| 72 69 6e 67 20 69 6e 20 | 66 69 65 6c 64 20 73 65 |ring in |field se|
|00000970| 61 72 63 68 46 69 65 6c | 64 0d 69 66 20 74 68 65 |archFiel|d.if the|
|00000980| 20 52 65 73 75 6c 74 20 | 69 73 20 65 6d 70 74 79 | Result |is empty|
|00000990| 20 74 68 65 6e 0d 67 65 | 74 20 74 68 65 20 6e 75 | then.ge|t the nu|
|000009a0| 6d 62 65 72 20 6f 66 20 | 74 68 69 73 20 63 61 72 |mber of |this car|
|000009b0| 64 0d 69 66 20 28 69 74 | 20 3e 3d 20 66 69 72 73 |d.if (it| >= firs|
|000009c0| 74 43 61 72 64 29 20 61 | 6e 64 20 28 69 74 20 3c |tCard) a|nd (it <|
|000009d0| 3d 20 6c 61 73 74 43 61 | 72 64 29 20 74 68 65 6e |= lastCa|rd) then|
|000009e0| 0d 70 75 74 20 69 74 20 | 69 6e 74 6f 20 66 6f 75 |.put it |into fou|
|000009f0| 6e 64 43 61 72 64 0d 65 | 78 69 74 20 72 65 70 65 |ndCard.e|xit repe|
|00000a00| 61 74 0d 65 6c 73 65 0d | 69 66 20 66 69 72 73 74 |at.else.|if first|
|00000a10| 46 69 6e 64 20 69 73 20 | 65 6d 70 74 79 20 74 68 |Find is |empty th|
|00000a20| 65 6e 0d 70 75 74 20 69 | 74 20 69 6e 74 6f 20 66 |en.put i|t into f|
|00000a30| 69 72 73 74 46 69 6e 64 | 0d 65 6c 73 65 0d 69 66 |irstFind|.else.if|
|00000a40| 20 69 74 3d 66 69 72 73 | 74 46 69 6e 64 20 74 68 | it=firs|tFind th|
|00000a50| 65 6e 0d 65 78 69 74 20 | 72 65 70 65 61 74 0d 65 |en.exit |repeat.e|
|00000a60| 6e 64 20 69 66 0d 65 6e | 64 20 69 66 0d 65 6e 64 |nd if.en|d if.end|
|00000a70| 20 69 66 0d 65 6c 73 65 | 0d 65 78 69 74 20 72 65 | if.else|.exit re|
|00000a80| 70 65 61 74 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |peat.end| if.end |
|00000a90| 72 65 70 65 61 74 0d 69 | 66 20 66 6f 75 6e 64 43 |repeat.i|f foundC|
|00000aa0| 61 72 64 20 69 73 20 65 | 6d 70 74 79 20 74 68 65 |ard is e|mpty the|
|00000ab0| 6e 0d 67 6f 20 63 61 72 | 64 20 73 74 61 72 74 43 |n.go car|d startC|
|00000ac0| 61 72 64 0d 65 6e 64 20 | 69 66 0d 73 65 74 20 6c |ard.end |if.set l|
|00000ad0| 6f 63 6b 53 63 72 65 65 | 6e 20 74 6f 20 66 61 6c |ockScree|n to fal|
|00000ae0| 73 65 0d 72 65 74 75 72 | 6e 20 66 6f 75 6e 64 43 |se.retur|n foundC|
|00000af0| 61 72 64 0d 65 6e 64 20 | 67 65 6e 65 72 69 63 46 |ard.end |genericF|
|00000b00| 69 6e 64 0d 0d 6f 6e 20 | 6e 65 77 43 75 73 74 6f |ind..on |newCusto|
|00000b10| 6d 65 72 0d 73 65 74 20 | 6c 6f 63 6b 73 63 72 65 |mer.set |lockscre|
|00000b20| 65 6e 20 74 6f 20 74 72 | 75 65 0d 67 6f 20 74 6f |en to tr|ue.go to|
|00000b30| 20 6c 61 73 74 20 63 61 | 72 64 20 2d 2d 20 61 73 | last ca|rd -- as|
|00000b40| 73 75 6d 65 73 20 6c 61 | 73 74 20 63 61 72 64 20 |sumes la|st card |
|00000b50| 69 73 20 63 75 73 74 6f | 6d 65 72 20 63 61 72 64 |is custo|mer card|
|00000b60| 0d 64 6f 6d 65 6e 75 20 | 22 4e 65 77 20 43 61 72 |.domenu |"New Car|
|00000b70| 64 22 0d 73 65 74 20 6c | 6f 63 6b 73 63 72 65 65 |d".set l|ockscree|
|00000b80| 6e 20 74 6f 20 66 61 6c | 73 65 0d 65 6e 64 20 6e |n to fal|se.end n|
|00000b90| 65 77 43 75 73 74 6f 6d | 65 72 0d 0d 6f 6e 20 66 |ewCustom|er..on f|
|00000ba0| 69 6e 64 43 75 73 74 6f | 6d 65 72 0d 73 65 74 20 |indCusto|mer.set |
|00000bb0| 6c 6f 63 6b 53 63 72 65 | 65 6e 20 74 6f 20 74 72 |lockScre|en to tr|
|00000bc0| 75 65 0d 41 73 6b 20 22 | 43 75 73 74 6f 6d 65 72 |ue.Ask "|Customer|
|00000bd0| 20 4e 61 6d 65 22 20 77 | 69 74 68 20 65 6d 70 74 | Name" w|ith empt|
|00000be0| 79 0d 69 66 20 69 74 20 | 69 73 20 65 6d 70 74 79 |y.if it |is empty|
|00000bf0| 20 74 68 65 6e 20 65 78 | 69 74 20 66 69 6e 64 43 | then ex|it findC|
|00000c00| 75 73 74 6f 6d 65 72 0d | 70 75 74 20 69 74 20 69 |ustomer.|put it i|
|00000c10| 6e 74 6f 20 63 75 73 74 | 6f 6d 65 72 4e 61 6d 65 |nto cust|omerName|
|00000c20| 0d 70 75 74 20 6e 75 6d | 62 65 72 20 6f 66 20 63 |.put num|ber of c|
|00000c30| 61 72 64 20 22 43 75 73 | 74 6f 6d 65 72 20 4d 61 |ard "Cus|tomer Ma|
|00000c40| 73 74 65 72 22 20 69 6e | 74 6f 20 66 69 72 73 74 |ster" in|to first|
|00000c50| 43 61 72 64 0d 70 75 74 | 20 6e 75 6d 62 65 72 20 |Card.put| number |
|00000c60| 6f 66 20 66 69 65 6c 64 | 20 22 53 65 6c 6c 20 74 |of field| "Sell t|
|00000c70| 6f 3a 22 20 6f 66 20 63 | 61 72 64 20 66 69 72 73 |o:" of c|ard firs|
|00000c80| 74 43 61 72 64 20 69 6e | 74 6f 20 66 69 65 6c 64 |tCard in|to field|
|00000c90| 4e 75 6d 62 65 72 0d 61 | 64 64 20 31 20 74 6f 20 |Number.a|dd 1 to |
|00000ca0| 66 69 72 73 74 43 61 72 | 64 0d 70 75 74 20 6e 75 |firstCar|d.put nu|
|00000cb0| 6d 62 65 72 20 6f 66 20 | 6c 61 73 74 20 43 61 72 |mber of |last Car|
|00000cc0| 64 20 69 6e 74 6f 20 6c | 61 73 74 43 61 72 64 0d |d into l|astCard.|
|00000cd0| 69 66 20 67 65 6e 65 72 | 69 63 46 69 6e 64 28 63 |if gener|icFind(c|
|00000ce0| 75 73 74 6f 6d 65 72 4e | 61 6d 65 2c 66 69 65 6c |ustomerN|ame,fiel|
|00000cf0| 64 4e 75 6d 62 65 72 2c | 66 69 72 73 74 43 61 72 |dNumber,|firstCar|
|00000d00| 64 2c 6c 61 73 74 43 61 | 72 64 29 20 69 73 20 65 |d,lastCa|rd) is e|
|00000d10| 6d 70 74 79 20 74 68 65 | 6e 0d 41 6e 73 77 65 72 |mpty the|n.Answer|
|00000d20| 20 22 43 75 73 74 6f 6d | 65 72 22 26 26 63 75 73 | "Custom|er"&&cus|
|00000d30| 74 6f 6d 65 72 4e 61 6d | 65 26 26 22 6e 6f 74 20 |tomerNam|e&&"not |
|00000d40| 66 6f 75 6e 64 22 0d 65 | 6e 64 20 69 66 0d 73 65 |found".e|nd if.se|
|00000d50| 74 20 6c 6f 63 6b 53 63 | 72 65 65 6e 20 74 6f 20 |t lockSc|reen to |
|00000d60| 66 61 6c 73 65 0d 65 6e | 64 20 66 69 6e 64 43 75 |false.en|d findCu|
|00000d70| 73 74 6f 6d 65 72 0d 0d | 6f 6e 20 67 6f 49 6e 76 |stomer..|on goInv|
|00000d80| 6f 69 63 65 20 49 6e 76 | 6f 69 63 65 4e 75 6d 62 |oice Inv|oiceNumb|
|00000d90| 65 72 0d 73 65 74 20 6c | 6f 63 6b 73 63 72 65 65 |er.set l|ockscree|
|00000da0| 6e 20 74 6f 20 74 72 75 | 65 0d 70 75 74 20 31 2b |n to tru|e.put 1+|
|00000db0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 61 |the numb|er of ca|
|00000dc0| 72 64 20 22 49 6e 76 6f | 69 63 65 20 4d 61 73 74 |rd "Invo|ice Mast|
|00000dd0| 65 72 22 20 69 6e 74 6f | 20 66 69 72 73 74 43 61 |er" into| firstCa|
|00000de0| 72 64 0d 70 75 74 20 74 | 68 65 20 6e 75 6d 62 65 |rd.put t|he numbe|
|00000df0| 72 20 6f 66 20 63 61 72 | 64 20 22 43 75 73 74 6f |r of car|d "Custo|
|00000e00| 6d 65 72 20 4d 61 73 74 | 65 72 22 20 69 6e 74 6f |mer Mast|er" into|
|00000e10| 20 6c 61 73 74 43 61 72 | 64 0d 73 75 62 74 72 61 | lastCar|d.subtra|
|00000e20| 63 74 20 31 20 66 72 6f | 6d 20 6c 61 73 74 43 61 |ct 1 fro|m lastCa|
|00000e30| 72 64 0d 70 75 74 20 74 | 68 65 20 6e 75 6d 62 65 |rd.put t|he numbe|
|00000e40| 72 20 6f 66 20 66 69 65 | 6c 64 20 22 49 6e 76 6f |r of fie|ld "Invo|
|00000e50| 69 63 65 20 4e 75 6d 62 | 65 72 22 20 6f 66 20 63 |ice Numb|er" of c|
|00000e60| 61 72 64 20 22 49 6e 76 | 6f 69 63 65 20 4d 61 73 |ard "Inv|oice Mas|
|00000e70| 74 65 72 22 c2 0d 69 6e | 74 6f 20 66 69 65 6c 64 |ter"..in|to field|
|00000e80| 4e 75 6d 62 65 72 0d 69 | 66 20 67 65 6e 65 72 69 |Number.i|f generi|
|00000e90| 63 46 69 6e 64 28 49 6e | 76 6f 69 63 65 4e 75 6d |cFind(In|voiceNum|
|00000ea0| 62 65 72 2c 66 69 65 6c | 64 4e 75 6d 62 65 72 2c |ber,fiel|dNumber,|
|00000eb0| 66 69 72 73 74 43 61 72 | 64 2c 6c 61 73 74 43 61 |firstCar|d,lastCa|
|00000ec0| 72 64 29 20 69 73 20 65 | 6d 70 74 79 20 74 68 65 |rd) is e|mpty the|
|00000ed0| 6e 0d 41 6e 73 77 65 72 | 20 22 49 6e 76 6f 69 63 |n.Answer| "Invoic|
|00000ee0| 65 22 26 26 49 6e 76 6f | 69 63 65 4e 75 6d 62 65 |e"&&Invo|iceNumbe|
|00000ef0| 72 26 26 22 6e 6f 74 20 | 66 6f 75 6e 64 22 0d 65 |r&&"not |found".e|
|00000f00| 6e 64 20 69 66 0d 73 65 | 74 20 6c 6f 63 6b 73 63 |nd if.se|t locksc|
|00000f10| 72 65 65 6e 20 74 6f 20 | 66 61 6c 73 65 0d 65 6e |reen to |false.en|
|00000f20| 64 20 67 6f 49 6e 76 6f | 69 63 65 0d 0d 6f 6e 20 |d goInvo|ice..on |
|00000f30| 66 69 6e 64 49 6e 76 6f | 69 63 65 0d 67 6c 6f 62 |findInvo|ice.glob|
|00000f40| 61 6c 20 6c 65 61 64 69 | 6e 67 5a 65 72 6f 73 0d |al leadi|ngZeros.|
|00000f50| 41 73 6b 20 22 49 6e 76 | 6f 69 63 65 20 4e 75 6d |Ask "Inv|oice Num|
|00000f60| 62 65 72 22 20 77 69 74 | 68 20 65 6d 70 74 79 0d |ber" wit|h empty.|
|00000f70| 69 66 20 69 74 20 69 73 | 20 65 6d 70 74 79 20 74 |if it is| empty t|
|00000f80| 68 65 6e 20 65 78 69 74 | 20 66 69 6e 64 49 6e 76 |hen exit| findInv|
|00000f90| 6f 69 63 65 0d 73 65 74 | 20 6e 75 6d 62 65 72 46 |oice.set| numberF|
|00000fa0| 6f 72 6d 61 74 20 74 6f | 20 6c 65 61 64 69 6e 67 |ormat to| leading|
|00000fb0| 5a 65 72 6f 73 0d 70 75 | 74 20 69 74 20 69 6e 74 |Zeros.pu|t it int|
|00000fc0| 6f 20 49 6e 76 6f 69 63 | 65 4e 75 6d 62 65 72 0d |o Invoic|eNumber.|
|00000fd0| 61 64 64 20 30 20 74 6f | 20 49 6e 76 6f 69 63 65 |add 0 to| Invoice|
|00000fe0| 4e 75 6d 62 65 72 0d 67 | 6f 49 6e 76 6f 69 63 65 |Number.g|oInvoice|
|00000ff0| 20 49 6e 76 6f 69 63 65 | 4e 75 6d 62 65 72 0d 65 | Invoice|Number.e|
|00001000| 6e 64 20 66 69 6e 64 49 | 6e 76 6f 69 63 65 0d 0d |nd findI|nvoice..|
|00001010| 2d 2d 66 75 6e 63 74 69 | 6f 6e 20 63 6c 69 63 6b |--functi|on click|
|00001020| 4c 69 6e 65 20 72 65 74 | 75 72 6e 73 20 74 68 65 |Line ret|urns the|
|00001030| 20 6c 69 6e 65 20 6f 66 | 20 74 68 65 20 74 61 72 | line of| the tar|
|00001040| 67 65 74 20 66 69 65 6c | 64 0d 2d 2d 6f 76 65 72 |get fiel|d.--over|
|00001050| 20 77 68 69 63 68 20 74 | 68 65 20 6d 6f 75 73 65 | which t|he mouse|
|00001060| 20 77 61 73 20 63 6c 69 | 63 6b 65 64 2e 20 20 49 | was cli|cked. I|
|00001070| 74 20 61 6c 6c 6f 77 73 | 20 34 20 70 69 78 65 6c |t allows| 4 pixel|
|00001080| 73 20 75 6e 64 65 72 20 | 74 68 65 0d 2d 2d 62 61 |s under |the.--ba|
|00001090| 73 65 6c 69 6e 65 20 66 | 6f 72 20 74 68 65 20 70 |seline f|or the p|
|000010a0| 73 79 63 68 6f 6c 6f 67 | 69 63 61 6c 20 65 66 66 |sycholog|ical eff|
|000010b0| 65 63 74 20 6f 66 20 64 | 65 73 63 65 6e 64 65 72 |ect of d|escender|
|000010c0| 73 2e 0d 2d 2d 20 41 64 | 61 70 74 65 64 20 66 72 |s..-- Ad|apted fr|
|000010d0| 6f 6d 20 74 68 65 20 48 | 79 70 65 72 43 61 72 64 |om the H|yperCard|
|000010e0| 20 31 2e 32 2e 31 20 55 | 70 64 61 74 65 20 64 65 | 1.2.1 U|pdate de|
|000010f0| 73 63 72 69 70 74 69 6f | 6e 0d 2d 2d 20 28 4d 29 |scriptio|n.-- (M)|
|00001100| 61 67 72 65 65 61 62 6c | 65 20 73 6f 66 74 77 61 |agreeabl|e softwa|
|00001110| 72 65 2c 20 69 6e 63 2e | 20 61 64 64 65 64 20 68 |re, inc.| added h|
|00001120| 61 6e 64 6c 69 6e 67 20 | 73 63 72 6f 6c 6c 61 62 |andling |scrollab|
|00001130| 6c 65 20 66 69 65 6c 64 | 73 0d 0d 66 75 6e 63 74 |le field|s..funct|
|00001140| 69 6f 6e 20 63 6c 69 63 | 6b 4c 69 6e 65 0d 70 75 |ion clic|kLine.pu|
|00001150| 74 20 74 68 65 20 6d 6f | 75 73 65 56 20 2d 20 69 |t the mo|useV - i|
|00001160| 74 65 6d 20 32 20 6f 66 | 20 74 68 65 20 72 65 63 |tem 2 of| the rec|
|00001170| 74 20 6f 66 20 74 68 65 | 20 74 61 72 67 65 74 c2 |t of the| target.|
|00001180| 0d 69 6e 74 6f 20 72 65 | 6c 61 74 69 76 65 4d 6f |.into re|lativeMo|
|00001190| 75 73 65 56 0d 61 64 64 | 20 2d 34 2b 74 68 65 20 |useV.add| -4+the |
|000011a0| 73 63 72 6f 6c 6c 20 6f | 66 20 74 68 65 20 74 61 |scroll o|f the ta|
|000011b0| 72 67 65 74 20 74 6f 20 | 72 65 6c 61 74 69 76 65 |rget to |relative|
|000011c0| 4d 6f 75 73 65 56 0d 64 | 69 76 69 64 65 20 72 65 |MouseV.d|ivide re|
|000011d0| 6c 61 74 69 76 65 4d 6f | 75 73 65 56 20 62 79 20 |lativeMo|useV by |
|000011e0| 74 68 65 20 74 65 78 74 | 68 65 69 67 68 74 20 6f |the text|height o|
|000011f0| 66 20 74 68 65 20 74 61 | 72 67 65 74 0d 72 65 74 |f the ta|rget.ret|
|00001200| 75 72 6e 20 74 72 75 6e | 63 28 72 65 6c 61 74 69 |urn trun|c(relati|
|00001210| 76 65 4d 6f 75 73 65 56 | 29 2b 31 0d 2d 2d 72 65 |veMouseV|)+1.--re|
|00001220| 74 75 72 6e 20 28 28 74 | 68 65 20 6d 6f 75 73 65 |turn ((t|he mouse|
|00001230| 56 20 2d 20 69 74 65 6d | 20 32 20 6f 66 20 74 68 |V - item| 2 of th|
|00001240| 65 20 72 65 63 74 20 6f | 66 20 74 68 65 20 74 61 |e rect o|f the ta|
|00001250| 72 67 65 74 2d 34 29 c2 | 0d 2d 2d 64 69 76 20 74 |rget-4).|.--div t|
|00001260| 68 65 20 74 65 78 74 68 | 65 69 67 68 74 20 6f 66 |he texth|eight of|
|00001270| 20 74 68 65 20 74 61 72 | 67 65 74 29 20 2b 20 31 | the tar|get) + 1|
|00001280| 0d 65 6e 64 20 63 6c 69 | 63 6b 4c 69 6e 65 0d 0d |.end cli|ckLine..|
|00001290| 6f 6e 20 63 6c 6f 73 65 | 53 74 61 63 6b 0d 67 6c |on close|Stack.gl|
|000012a0| 6f 62 61 6c 20 73 61 76 | 65 64 4c 65 76 65 6c 0d |obal sav|edLevel.|
|000012b0| 69 66 20 66 72 65 65 53 | 69 7a 65 20 6f 66 20 74 |if freeS|ize of t|
|000012c0| 68 69 73 20 73 74 61 63 | 6b 20 3e 20 30 20 74 68 |his stac|k > 0 th|
|000012d0| 65 6e 0d 70 75 74 20 22 | 43 6f 6d 70 61 63 74 69 |en.put "|Compacti|
|000012e0| 6e 67 20 53 74 61 63 6b | 22 0d 64 6f 4d 65 6e 75 |ng Stack|".doMenu|
|000012f0| 20 22 43 6f 6d 70 61 63 | 74 20 53 74 61 63 6b 22 | "Compac|t Stack"|
|00001300| 0d 68 69 64 65 20 6d 65 | 73 73 61 67 65 20 62 6f |.hide me|ssage bo|
|00001310| 78 0d 65 6e 64 20 69 66 | 0d 73 65 74 20 74 68 65 |x.end if|.set the|
|00001320| 20 75 73 65 72 6c 65 76 | 65 6c 20 74 6f 20 73 61 | userlev|el to sa|
|00001330| 76 65 64 4c 65 76 65 6c | 0d 65 6e 64 20 63 6c 6f |vedLevel|.end clo|
|00001340| 73 65 53 74 61 63 6b 00 | 74 68 65 20 73 63 72 6f |seStack.|the scro|
|00001350| 6c 6c 20 6f 66 20 74 68 | 65 20 74 61 72 67 65 74 |ll of th|e target|
|00001360| 20 74 6f 20 72 65 6c 61 | 74 69 76 65 4d 6f 75 73 | to rela|tiveMous|
|00001370| 65 56 0d 64 69 76 69 64 | 65 20 72 65 6c 61 74 69 |eV.divid|e relati|
|00001380| 76 65 4d 6f 75 73 65 56 | 20 62 79 20 74 68 65 20 |veMouseV| by the |
|00001390| 74 65 78 74 68 65 69 67 | 68 74 20 6f 66 20 74 68 |textheig|ht of th|
|000013a0| 65 20 74 61 72 67 65 74 | 0d 72 65 74 75 72 6e 20 |e target|.return |
|000013b0| 74 72 75 6e 63 28 72 65 | 6c 61 74 69 76 65 4d 6f |trunc(re|lativeMo|
|000013c0| 75 73 65 56 29 2b 31 0d | 2d 2d 72 65 74 75 72 6e |useV)+1.|--return|
|000013d0| 20 28 28 74 68 65 20 6d | 6f 75 73 65 56 20 2d 20 | ((the m|ouseV - |
|000013e0| 69 74 65 6d 20 32 20 6f | 66 20 74 68 65 20 72 65 |item 2 o|f the re|
|000013f0| 63 74 20 6f 66 20 74 68 | 65 20 74 61 72 67 65 74 |ct of th|e target|
|00001400| 2d 34 29 c2 0d 2d 2d 64 | 69 76 20 74 68 65 20 74 |-4)..--d|iv the t|
|00001410| 65 78 74 68 65 69 67 68 | 74 20 6f 66 20 74 68 65 |extheigh|t of the|
|00001420| 20 74 61 72 67 65 74 29 | 20 2b 20 31 0d 65 6e 64 | target)| + 1.end|
|00001430| 20 63 6c 69 63 6b 4c 69 | 6e 65 0d 0d 6f 6e 20 63 | clickLi|ne..on c|
|00001440| 6c 6f 73 65 53 74 61 63 | 6b 0d 65 6e 64 20 63 6c |loseStac|k.end cl|
|00001450| 6f 73 65 53 74 61 63 6b | 00 76 6f 69 63 65 4e 75 |oseStack|.voiceNu|
|00001460| 6d 62 65 72 0d 67 6f 49 | 6e 76 6f 69 63 65 20 49 |mber.goI|nvoice I|
|00001470| 6e 76 6f 69 63 65 4e 75 | 6d 62 65 72 0d 65 6e 64 |nvoiceNu|mber.end|
|00001480| 20 66 69 6e 64 49 6e 76 | 6f 69 63 65 0d 0d 2d 2d | findInv|oice..--|
|00001490| 66 75 6e 63 74 69 6f 6e | 20 63 6c 69 63 6b 4c 69 |function| clickLi|
|000014a0| 6e 65 20 72 65 74 75 72 | 6e 73 20 74 68 65 20 6c |ne retur|ns the l|
|000014b0| 69 6e 65 20 6f 66 20 74 | 68 65 20 74 61 72 67 65 |ine of t|he targe|
|000014c0| 74 20 66 69 65 6c 64 0d | 2d 2d 6f 76 65 72 20 77 |t field.|--over w|
|000014d0| 68 69 63 68 20 74 68 65 | 20 6d 6f 75 73 65 20 77 |hich the| mouse w|
|000014e0| 61 73 20 63 6c 69 63 6b | 65 64 2e 20 20 49 74 20 |as click|ed. It |
|000014f0| 61 6c 6c 6f 77 73 20 34 | 20 70 69 78 65 6c 73 20 |allows 4| pixels |
|00001500| 75 6e 64 65 72 20 74 68 | 65 0d 2d 2d 62 61 73 65 |under th|e.--base|
|00001510| 6c 69 6e 65 20 66 6f 72 | 20 74 68 65 20 70 73 79 |line for| the psy|
|00001520| 63 68 6f 6c 6f 67 69 63 | 61 6c 20 65 66 66 65 63 |chologic|al effec|
|00001530| 74 20 6f 66 20 64 65 73 | 63 65 6e 64 65 72 73 2e |t of des|cenders.|
|00001540| 0d 2d 2d 20 41 64 61 70 | 74 65 64 20 66 72 6f 6d |.-- Adap|ted from|
|00001550| 20 74 68 65 20 48 79 70 | 65 72 43 61 72 64 20 31 | the Hyp|erCard 1|
|00001560| 2e 32 2e 31 20 55 70 64 | 61 74 65 20 64 65 73 63 |.2.1 Upd|ate desc|
|00001570| 72 69 70 74 69 6f 6e 0d | 2d 2d 20 28 4d 29 61 67 |ription.|-- (M)ag|
|00001580| 72 65 65 61 62 6c 65 20 | 73 6f 66 74 77 61 72 65 |reeable |software|
|00001590| 2c 20 69 6e 63 2e 20 61 | 64 64 65 64 20 68 61 6e |, inc. a|dded han|
|000015a0| 64 6c 69 6e 67 20 73 63 | 72 6f 6c 6c 61 62 6c 65 |dling sc|rollable|
|000015b0| 20 66 69 65 6c 64 73 0d | 0d 66 75 6e 63 74 69 6f | fields.|.functio|
|000015c0| 6e 20 63 6c 69 63 6b 4c | 69 6e 65 0d 70 75 74 20 |n clickL|ine.put |
|000015d0| 74 68 65 20 6d 6f 75 73 | 65 56 20 2d 20 69 74 65 |the mous|eV - ite|
|000015e0| 6d 20 32 20 6f 66 20 74 | 68 65 20 72 65 63 74 20 |m 2 of t|he rect |
|000015f0| 6f 66 20 74 68 65 20 74 | 61 72 67 65 74 c2 0d 69 |of the t|arget..i|
|00001600| 6e 74 6f 20 72 65 6c 61 | 74 69 76 65 4d 6f 75 73 |nto rela|tiveMous|
|00001610| 65 56 0d 61 64 64 20 2d | 34 2b 74 68 65 20 73 63 |eV.add -|4+the sc|
|00001620| 72 6f 6c 6c 20 6f 66 20 | 74 68 65 20 74 61 72 67 |roll of |the targ|
|00001630| 65 74 20 74 6f 20 72 65 | 6c 61 74 69 76 65 4d 6f |et to re|lativeMo|
|00001640| 75 73 65 56 0d 64 69 76 | 69 64 65 20 72 65 6c 61 |useV.div|ide rela|
|00001650| 74 69 76 65 4d 6f 75 73 | 65 56 20 62 79 20 74 68 |tiveMous|eV by th|
|00001660| 65 20 74 65 78 74 68 65 | 69 67 68 74 20 6f 66 20 |e texthe|ight of |
|00001670| 74 68 65 20 74 61 72 67 | 65 74 0d 72 65 74 75 72 |the targ|et.retur|
|00001680| 6e 20 74 72 75 6e 63 28 | 72 65 6c 61 74 69 76 65 |n trunc(|relative|
|00001690| 4d 6f 75 73 65 56 29 2b | 31 0d 2d 2d 72 65 74 75 |MouseV)+|1.--retu|
|000016a0| 72 6e 20 28 28 74 68 65 | 20 6d 6f 75 73 65 56 20 |rn ((the| mouseV |
|000016b0| 2d 20 69 74 65 6d 20 32 | 20 6f 66 20 74 68 65 20 |- item 2| of the |
|000016c0| 72 65 63 74 20 6f 66 20 | 74 68 65 20 74 61 72 67 |rect of |the targ|
|000016d0| 65 74 2d 34 29 c2 0d 2d | 2d 64 69 76 20 74 68 65 |et-4)..-|-div the|
|000016e0| 20 74 65 78 74 68 65 69 | 67 68 74 20 6f 66 20 74 | texthei|ght of t|
|000016f0| 68 65 20 74 61 72 67 65 | 74 29 20 2b 20 31 0d 65 |he targe|t) + 1.e|
|00001700| 6e 64 20 63 6c 69 63 6b | 4c 69 6e 65 0d 0d 6f 6e |nd click|Line..on|
|00001710| 20 63 6c 6f 73 65 53 74 | 61 63 6b 0d 65 6e 64 20 | closeSt|ack.end |
|00001720| 63 6c 6f 73 65 53 74 61 | 63 6b 00 74 20 74 68 65 |closeSta|ck.t the|
|00001730| 20 6d 6f 75 73 65 56 20 | 2d 20 69 74 65 6d 20 32 | mouseV |- item 2|
|00001740| 20 6f 66 20 74 68 65 20 | 72 65 63 74 20 6f 66 20 | of the |rect of |
|00001750| 74 68 65 20 74 61 72 67 | 65 74 c2 0d 69 6e 74 6f |the targ|et..into|
|00001760| 20 72 65 6c 61 74 69 76 | 65 4d 6f 75 73 65 56 0d | relativ|eMouseV.|
|00001770| 61 64 64 20 2d 34 2b 74 | 68 65 20 73 63 72 6f 6c |add -4+t|he scrol|
|00001780| 6c 20 6f 66 20 74 68 65 | 20 74 61 72 67 65 74 20 |l of the| target |
|00001790| 74 6f 20 72 65 6c 61 74 | 69 76 65 4d 6f 75 73 65 |to relat|iveMouse|
|000017a0| 56 0d 64 69 76 69 64 65 | 20 72 65 6c 61 74 69 76 |V.divide| relativ|
|000017b0| 65 4d 6f 75 73 65 56 20 | 62 79 20 74 68 65 20 74 |eMouseV |by the t|
|000017c0| 65 78 74 68 65 69 67 68 | 74 20 6f 66 20 74 68 65 |extheigh|t of the|
|000017d0| 20 74 61 72 67 65 74 0d | 72 65 74 75 72 6e 20 74 | target.|return t|
|000017e0| 72 75 6e 63 28 72 65 6c | 61 74 69 76 65 4d 6f 75 |runc(rel|ativeMou|
|000017f0| 73 65 56 29 2b 31 0d 2d | 2d 72 65 74 75 72 6e 20 |seV)+1.-|-return |
|00001800| 28 28 74 68 65 20 6d 6f | 75 73 65 56 20 2d 20 69 |((the mo|useV - i|
|00001810| 74 65 6d 20 32 20 6f 66 | 20 74 68 65 20 72 65 63 |tem 2 of| the rec|
|00001820| 74 20 6f 66 20 74 68 65 | 20 74 61 72 67 65 74 2d |t of the| target-|
|00001830| 34 29 c2 0d 2d 2d 64 69 | 76 20 74 68 65 20 74 65 |4)..--di|v the te|
|00001840| 78 74 68 65 69 67 68 74 | 20 6f 66 20 74 68 65 20 |xtheight| of the |
|00001850| 74 61 72 67 65 74 29 20 | 2b 20 31 0d 65 6e 64 20 |target) |+ 1.end |
|00001860| 63 6c 69 63 6b 4c 69 6e | 65 0d 0d 6f 6e 20 63 6c |clickLin|e..on cl|
|00001870| 6f 73 65 53 74 61 63 6b | 0d 65 6e 64 20 63 6c 6f |oseStack|.end clo|
|00001880| 73 65 53 74 61 63 6b 00 | 73 65 56 20 2d 20 69 74 |seStack.|seV - it|
|00001890| 65 6d 20 32 20 6f 66 20 | 74 68 65 20 72 65 63 74 |em 2 of |the rect|
|000018a0| 20 6f 66 20 74 68 65 20 | 74 61 72 67 65 74 2d 34 | of the |target-4|
|000018b0| 29 c2 0d 2d 2d 64 69 76 | 20 74 68 65 20 74 65 78 |)..--div| the tex|
|000018c0| 74 68 65 69 67 68 74 20 | 6f 66 20 74 68 65 20 74 |theight |of the t|
|000018d0| 61 72 67 65 74 29 20 2b | 20 31 0d 65 6e 64 20 63 |arget) +| 1.end c|
|000018e0| 6c 69 63 6b 4c 69 6e 65 | 0d 0d 6f 6e 20 63 6c 6f |lickLine|..on clo|
|000018f0| 73 65 53 74 61 63 6b 0d | 65 6e 64 20 63 6c 6f 73 |seStack.|end clos|
|00001900| 65 53 74 61 63 6b 00 69 | 6f 6e 0d 2d 2d 20 28 4d |eStack.i|on.-- (M|
|00001910| 29 61 67 72 65 65 61 62 | 6c 65 20 73 6f 66 74 77 |)agreeab|le softw|
|00001920| 61 72 65 2c 20 69 6e 63 | 2e 20 61 64 64 65 64 20 |are, inc|. added |
|00001930| 68 61 6e 64 6c 69 6e 67 | 20 73 63 72 6f 6c 6c 61 |handling| scrolla|
|00001940| 62 6c 65 20 66 69 65 6c | 64 73 0d 0d 66 75 6e 63 |ble fiel|ds..func|
|00001950| 74 69 6f 6e 20 63 6c 69 | 63 6b 4c 69 6e 65 0d 70 |tion cli|ckLine.p|
|00001960| 75 74 20 74 68 65 20 6d | 6f 75 73 65 56 20 2d 20 |ut the m|ouseV - |
|00001970| 69 74 65 6d 20 32 20 6f | 66 20 74 68 65 20 72 65 |item 2 o|f the re|
|00001980| 63 74 20 6f 66 20 74 68 | 65 20 74 61 72 67 65 74 |ct of th|e target|
|00001990| c2 0d 69 6e 74 6f 20 72 | 65 6c 61 74 69 76 65 4d |..into r|elativeM|
|000019a0| 6f 75 73 65 56 0d 61 64 | 64 20 2d 34 2b 74 68 65 |ouseV.ad|d -4+the|
|000019b0| 20 73 63 72 6f 6c 6c 20 | 6f 66 20 74 68 65 20 74 | scroll |of the t|
|000019c0| 61 72 67 65 74 20 74 6f | 20 72 65 6c 61 74 69 76 |arget to| relativ|
|000019d0| 65 4d 6f 75 73 65 56 0d | 64 69 76 69 64 65 20 72 |eMouseV.|divide r|
|000019e0| 65 6c 61 74 69 76 65 4d | 6f 75 73 65 56 20 62 79 |elativeM|ouseV by|
|000019f0| 20 74 68 65 20 74 65 78 | 74 68 65 69 67 68 74 20 | the tex|theight |
|00001a00| 6f 66 20 74 68 65 20 74 | 61 72 67 65 74 0d 72 65 |of the t|arget.re|
|00001a10| 74 75 72 6e 20 74 72 75 | 6e 63 28 72 65 6c 61 74 |turn tru|nc(relat|
|00001a20| 69 76 65 4d 6f 75 73 65 | 56 29 2b 31 0d 2d 2d 72 |iveMouse|V)+1.--r|
|00001a30| 65 74 75 72 6e 20 28 28 | 74 68 65 20 6d 6f 75 73 |eturn ((|the mous|
|00001a40| 65 56 20 2d 20 69 74 65 | 6d 20 32 20 6f 66 20 74 |eV - ite|m 2 of t|
|00001a50| 68 65 20 72 65 63 74 20 | 6f 66 20 74 68 65 20 74 |he rect |of the t|
|00001a60| 61 72 67 65 74 2d 34 29 | c2 0d 2d 2d 64 69 76 20 |arget-4)|..--div |
|00001a70| 74 68 65 20 74 65 78 74 | 68 65 69 67 68 74 20 6f |the text|height o|
|00001a80| 66 20 74 68 65 20 74 61 | 72 67 65 74 29 20 2b 20 |f the ta|rget) + |
|00001a90| 31 0d 65 6e 64 20 63 6c | 69 63 6b 4c 69 6e 65 0d |1.end cl|ickLine.|
|00001aa0| 0d 6f 6e 20 63 6c 6f 73 | 65 53 74 61 63 6b 0d 65 |.on clos|eStack.e|
|00001ab0| 6e 64 20 63 6c 6f 73 65 | 53 74 61 63 6b 00 64 69 |nd close|Stack.di|
|00001ac0| 76 20 74 68 65 20 74 65 | 78 74 68 65 69 67 68 74 |v the te|xtheight|
|00001ad0| 20 6f 66 20 74 68 65 20 | 74 61 72 67 65 74 29 20 | of the |target) |
|00001ae0| 2b 20 31 0d 65 6e 64 20 | 63 6c 69 63 6b 4c 69 6e |+ 1.end |clickLin|
|00001af0| 65 0d 0d 6f 6e 20 63 6c | 6f 73 65 53 74 61 63 6b |e..on cl|oseStack|
|00001b00| 0d 65 6e 64 20 63 6c 6f | 73 65 53 74 61 63 6b 00 |.end clo|seStack.|
|00001b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c00| 00 00 02 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00001c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c20| 00 05 55 bf 00 05 50 37 | 00 02 4f 14 00 05 1f 98 |..U...P7|..O.....|
|00001c30| 00 01 34 e5 00 04 37 0f | 00 04 1c 48 00 04 d3 5a |..4...7.|...H...Z|
|00001c40| 00 01 a1 27 00 05 0e 0f | 00 05 1a ce 00 04 c7 6c |...'....|.......l|
|00001c50| 00 05 4d 5c 00 05 28 c5 | 00 00 00 00 00 04 df 8b |..M\..(.|........|
|00001c60| 00 01 c6 2b 00 00 f0 e1 | 00 00 f4 21 00 02 2d c7 |...+....|...!..-.|
|00001c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e00| 00 00 00 80 4c 49 53 54 | 00 00 19 e1 00 00 00 01 |....LIST|........|
|00001e10| 00 00 08 00 00 00 00 06 | 00 14 00 02 00 04 00 03 |........|........|
|00001e20| 20 00 03 4a 00 00 00 06 | 00 00 00 00 00 00 00 00 | ..J....|........|
|00001e30| 00 00 1a 21 00 06 00 00 | 00 00 00 00 00 00 00 00 |...!....|........|
|00001e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e80| 00 00 08 00 50 41 47 45 | 00 00 1a 21 00 00 19 e1 |....PAGE|...!....|
|00001e90| 7b cc 81 7f 00 00 00 00 | 00 00 0f 5a e0 65 6e f7 |{.......|...Z.en.|
|00001ea0| ba ad d8 fb ff 87 38 fa | f7 75 9f 80 00 00 17 8b |......8.|.u......|
|00001eb0| e0 00 30 02 80 90 80 00 | 08 60 04 08 00 28 00 80 |..0.....|.`...(..|
|00001ec0| 00 00 12 ce e0 4c e3 42 | 49 c1 04 51 00 98 00 80 |.....L.B|I..Q....|
|00001ed0| 83 1c 21 80 00 00 0b 98 | a0 21 f7 9a b9 e9 fa f9 |..!.....|.!......|
|00001ee0| 92 b3 9c 74 cb bf 8f c0 | 00 00 14 5c e0 48 22 02 |...t....|...\.H".|
|00001ef0| 89 90 04 01 00 04 00 00 | 0c 18 00 00 00 00 09 37 |........|.......7|
|00001f00| a0 01 30 82 10 e9 98 01 | 30 03 08 10 02 2f 06 40 |..0.....|0..../.@|
|00001f10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002000| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000022a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000022b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000022c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000022d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000022e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000022f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002680| 00 00 0d a0 42 4b 47 44 | 00 00 0c e5 00 00 10 27 |....BKGD|.......'|
|00002690| 00 00 00 00 00 00 00 01 | 00 00 18 2b 00 00 0d 0f |........|...+....|
|000026a0| 00 09 00 0e 00 00 06 6c | 00 00 00 00 00 00 00 50 |.......l|.......P|
|000026b0| 00 06 01 00 01 17 00 57 | 01 49 00 91 a0 00 00 00 |.......W|.I......|
|000026c0| 19 f9 00 01 00 00 00 0c | 00 00 00 10 46 69 6e 64 |........|....Find|
|000026d0| 20 49 6e 76 6f 69 63 65 | 00 00 6f 6e 20 6d 6f 75 | Invoice|..on mou|
|000026e0| 73 65 55 70 0d 66 69 6e | 64 49 6e 76 6f 69 63 65 |seUp.fin|dInvoice|
|000026f0| 0d 65 6e 64 20 6d 6f 75 | 73 65 55 70 00 00 00 5e |.end mou|seUp...^|
|00002700| 00 07 01 00 00 00 01 e2 | 00 1b 02 00 00 00 00 00 |........|........|
|00002710| 4e 82 00 01 00 00 00 0c | 00 00 00 10 48 6f 6d 65 |N.......|....Home|
|00002720| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 76 69 73 |..on mou|seUp.vis|
|00002730| 75 61 6c 20 65 66 66 65 | 63 74 20 69 72 69 73 20 |ual effe|ct iris |
|00002740| 63 6c 6f 73 65 0d 67 6f | 20 68 6f 6d 65 0d 65 6e |close.go| home.en|
|00002750| 64 20 6d 6f 75 73 65 55 | 70 0d 00 00 00 90 00 08 |d mouseU|p.......|
|00002760| 01 00 01 17 00 ae 01 49 | 00 f4 a0 00 00 00 2d 7d |.......I|......-}|
|00002770| 00 01 00 00 00 0c 00 00 | 00 10 46 69 6e 64 20 43 |........|..Find C|
|00002780| 75 73 74 6f 6d 65 72 00 | 00 6f 6e 20 6d 6f 75 73 |ustomer.|.on mous|
|00002790| 65 55 70 0d 67 6c 6f 62 | 61 6c 20 66 69 6e 64 4d |eUp.glob|al findM|
|000027a0| 6f 64 65 0d 70 75 74 20 | 74 72 75 65 20 69 6e 74 |ode.put |true int|
|000027b0| 6f 20 66 69 6e 64 4d 6f | 64 65 0d 66 69 6e 64 43 |o findMo|de.findC|
|000027c0| 75 73 74 6f 6d 65 72 0d | 70 75 74 20 66 61 6c 73 |ustomer.|put fals|
|000027d0| 65 20 69 6e 74 6f 20 66 | 69 6e 64 4d 6f 64 65 0d |e into f|indMode.|
|000027e0| 65 6e 64 20 6d 6f 75 73 | 65 55 70 00 00 50 00 09 |end mous|eUp..P..|
|000027f0| 01 00 01 17 01 01 01 49 | 01 48 a0 00 00 00 44 49 |.......I|.H....DI|
|00002800| 00 01 00 00 00 0c 00 00 | 00 10 4e 65 77 20 43 75 |........|..New Cu|
|00002810| 73 74 6f 6d 65 72 00 00 | 6f 6e 20 6d 6f 75 73 65 |stomer..|on mouse|
|00002820| 55 70 0d 6e 65 77 43 75 | 73 74 6f 6d 65 72 0d 65 |Up.newCu|stomer.e|
|00002830| 6e 64 20 6d 6f 75 73 65 | 55 70 00 00 00 5a 00 0a |nd mouse|Up...Z..|
|00002840| 01 00 01 17 01 58 01 48 | 01 aa 80 00 00 00 69 b0 |.....X.H|......i.|
|00002850| 00 01 00 00 00 0c 00 00 | 00 10 50 72 65 66 65 72 |........|..Prefer|
|00002860| 65 6e 63 65 73 00 00 6f | 6e 20 6d 6f 75 73 65 55 |ences..o|n mouseU|
|00002870| 70 0d 67 6f 20 74 6f 20 | 63 61 72 64 20 70 72 65 |p.go to |card pre|
|00002880| 66 65 72 65 6e 63 65 73 | 0d 65 6e 64 20 6d 6f 75 |ferences|.end mou|
|00002890| 73 65 55 70 0d 00 01 32 | 00 0b 01 00 00 d7 00 08 |seUp...2|........|
|000028a0| 01 0a 00 48 80 00 00 00 | 03 f6 00 01 00 00 00 0c |...H....|........|
|000028b0| 00 00 00 10 4c 61 73 74 | 20 49 6e 76 6f 69 63 65 |....Last| Invoice|
|000028c0| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 2d 2d 20 |..on mou|seUp.-- |
|000028d0| 61 73 73 75 6d 65 73 20 | 49 6e 76 6f 69 63 65 73 |assumes |Invoices|
|000028e0| 20 61 72 65 20 62 65 74 | 77 65 65 6e 20 49 6e 76 | are bet|ween Inv|
|000028f0| 6f 69 63 65 20 61 6e 64 | 20 43 75 73 74 6f 6d 65 |oice and| Custome|
|00002900| 72 20 4d 61 73 74 65 72 | 73 0d 67 65 74 20 74 68 |r Master|s.get th|
|00002910| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 63 61 72 64 |e number| of card|
|00002920| 20 22 43 75 73 74 6f 6d | 65 72 20 4d 61 73 74 65 | "Custom|er Maste|
|00002930| 72 22 0d 73 75 62 74 72 | 61 63 74 20 31 20 66 72 |r".subtr|act 1 fr|
|00002940| 6f 6d 20 69 74 0d 69 66 | 20 69 74 20 3e 20 74 68 |om it.if| it > th|
|00002950| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 63 61 72 64 |e number| of card|
|00002960| 20 22 49 6e 76 6f 69 63 | 65 20 4d 61 73 74 65 72 | "Invoic|e Master|
|00002970| 22 20 74 68 65 6e 0d 67 | 6f 20 63 61 72 64 20 69 |" then.g|o card i|
|00002980| 74 0d 65 6c 73 65 0d 41 | 6e 73 77 65 72 20 22 59 |t.else.A|nswer "Y|
|00002990| 6f 75 20 68 61 76 65 20 | 6e 6f 20 69 6e 76 6f 69 |ou have |no invoi|
|000029a0| 63 65 73 20 69 6e 20 74 | 68 69 73 20 73 74 61 63 |ces in t|his stac|
|000029b0| 6b 22 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 6d 6f |k".end i|f.end mo|
|000029c0| 75 73 65 55 70 0d 00 00 | 01 2c 00 0c 01 00 00 d7 |useUp...|.,......|
|000029d0| 01 b6 01 0a 01 f6 80 00 | 00 00 03 f5 00 01 00 00 |........|........|
|000029e0| 00 0c 00 00 00 10 46 69 | 72 73 74 20 49 6e 76 6f |......Fi|rst Invo|
|000029f0| 69 63 65 00 00 6f 6e 20 | 6d 6f 75 73 65 55 70 0d |ice..on |mouseUp.|
|00002a00| 2d 2d 20 61 73 73 75 6d | 65 73 20 49 6e 76 6f 69 |-- assum|es Invoi|
|00002a10| 63 65 73 20 61 72 65 20 | 62 65 74 77 65 65 6e 20 |ces are |between |
|00002a20| 49 6e 76 6f 69 63 65 20 | 61 6e 64 20 43 75 73 74 |Invoice |and Cust|
|00002a30| 6f 6d 65 72 20 4d 61 73 | 74 65 72 73 0d 67 65 74 |omer Mas|ters.get|
|00002a40| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 63 | the num|ber of c|
|00002a50| 61 72 64 20 22 49 6e 76 | 6f 69 63 65 20 4d 61 73 |ard "Inv|oice Mas|
|00002a60| 74 65 72 22 0d 61 64 64 | 20 31 20 74 6f 20 69 74 |ter".add| 1 to it|
|00002a70| 0d 69 66 20 69 74 20 3c | 20 74 68 65 20 6e 75 6d |.if it <| the num|
|00002a80| 62 65 72 20 6f 66 20 63 | 61 72 64 20 22 43 75 73 |ber of c|ard "Cus|
|00002a90| 74 6f 6d 65 72 20 4d 61 | 73 74 65 72 22 20 74 68 |tomer Ma|ster" th|
|00002aa0| 65 6e 0d 67 6f 20 63 61 | 72 64 20 69 74 0d 65 6c |en.go ca|rd it.el|
|00002ab0| 73 65 0d 41 6e 73 77 65 | 72 20 22 59 6f 75 20 68 |se.Answe|r "You h|
|00002ac0| 61 76 65 20 6e 6f 20 69 | 6e 76 6f 69 63 65 73 20 |ave no i|nvoices |
|00002ad0| 69 6e 20 74 68 69 73 20 | 73 74 61 63 6b 22 0d 65 |in this |stack".e|
|00002ae0| 6e 64 20 69 66 0d 65 6e | 64 20 6d 6f 75 73 65 55 |nd if.en|d mouseU|
|00002af0| 70 0d 00 00 01 1a 00 0d | 01 00 01 16 01 b5 01 49 |p.......|.......I|
|00002b00| 01 fa 80 00 00 00 03 f5 | 00 01 00 00 00 0c 00 00 |........|........|
|00002b10| 00 10 46 69 72 73 74 20 | 43 75 73 74 6f 6d 65 72 |..First |Customer|
|00002b20| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 2d 2d 20 |..on mou|seUp.-- |
|00002b30| 61 73 73 75 6d 65 73 20 | 6f 6e 6c 79 20 43 75 73 |assumes |only Cus|
|00002b40| 74 6f 6d 65 72 73 20 61 | 72 65 20 61 66 74 65 72 |tomers a|re after|
|00002b50| 20 43 75 73 74 6f 6d 65 | 72 20 4d 61 73 74 65 72 | Custome|r Master|
|00002b60| 73 0d 67 65 74 20 74 68 | 65 20 6e 75 6d 62 65 72 |s.get th|e number|
|00002b70| 20 6f 66 20 63 61 72 64 | 20 22 43 75 73 74 6f 6d | of card| "Custom|
|00002b80| 65 72 20 4d 61 73 74 65 | 72 22 0d 69 66 20 69 74 |er Maste|r".if it|
|00002b90| 20 3c 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 | < the n|umber of|
|00002ba0| 20 6c 61 73 74 20 63 61 | 72 64 20 74 68 65 6e 0d | last ca|rd then.|
|00002bb0| 61 64 64 20 31 20 74 6f | 20 69 74 0d 67 6f 20 63 |add 1 to| it.go c|
|00002bc0| 61 72 64 20 69 74 0d 65 | 6c 73 65 0d 41 6e 73 77 |ard it.e|lse.Answ|
|00002bd0| 65 72 20 22 59 6f 75 20 | 68 61 76 65 20 6e 6f 20 |er "You |have no |
|00002be0| 43 75 73 74 6f 6d 65 72 | 73 20 69 6e 20 74 68 69 |Customer|s in thi|
|00002bf0| 73 20 73 74 61 63 6b 22 | 0d 65 6e 64 20 69 66 0d |s stack"|.end if.|
|00002c00| 65 6e 64 20 6d 6f 75 73 | 65 55 70 0d 00 00 01 0c |end mous|eUp.....|
|00002c10| 00 0e 01 00 01 16 00 08 | 01 49 00 48 80 00 00 00 |........|.I.H....|
|00002c20| 03 f6 00 01 00 00 00 0c | 00 00 00 10 4c 61 73 74 |........|....Last|
|00002c30| 20 43 75 73 74 6f 6d 65 | 72 00 00 6f 6e 20 6d 6f | Custome|r..on mo|
|00002c40| 75 73 65 55 70 0d 2d 2d | 20 61 73 73 75 6d 65 73 |useUp.--| assumes|
|00002c50| 20 6f 6e 6c 79 20 43 75 | 73 74 6f 6d 65 72 73 20 | only Cu|stomers |
|00002c60| 61 72 65 20 61 66 74 65 | 72 20 43 75 73 74 6f 6d |are afte|r Custom|
|00002c70| 65 72 20 4d 61 73 74 65 | 72 73 0d 67 65 74 20 74 |er Maste|rs.get t|
|00002c80| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 6c 61 73 |he numbe|r of las|
|00002c90| 74 20 63 61 72 64 0d 69 | 66 20 69 74 20 3e 20 74 |t card.i|f it > t|
|00002ca0| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 63 61 72 |he numbe|r of car|
|00002cb0| 64 20 22 43 75 73 74 6f | 6d 65 72 20 4d 61 73 74 |d "Custo|mer Mast|
|00002cc0| 65 72 22 20 74 68 65 6e | 0d 67 6f 20 63 61 72 64 |er" then|.go card|
|00002cd0| 20 69 74 0d 65 6c 73 65 | 0d 41 6e 73 77 65 72 20 | it.else|.Answer |
|00002ce0| 22 59 6f 75 20 68 61 76 | 65 20 6e 6f 20 43 75 73 |"You hav|e no Cus|
|00002cf0| 74 6f 6d 65 72 73 20 69 | 6e 20 74 68 69 73 20 73 |tomers i|n this s|
|00002d00| 74 61 63 6b 22 0d 65 6e | 64 20 69 66 0d 65 6e 64 |tack".en|d if.end|
|00002d10| 20 6d 6f 75 73 65 55 70 | 0d 00 00 6f 6e 20 64 72 | mouseUp|...on dr|
|00002d20| 61 77 54 65 78 74 20 6f | 75 72 42 75 74 74 6f 6e |awText o|urButton|
|00002d30| 0d 63 68 6f 6f 73 65 20 | 74 65 78 74 20 74 6f 6f |.choose |text too|
|00002d40| 6c 0d 67 65 74 20 74 68 | 65 20 6c 6f 63 20 6f 66 |l.get th|e loc of|
|00002d50| 20 62 75 74 74 6f 6e 20 | 6f 75 72 42 75 74 74 6f | button |ourButto|
|00002d60| 6e 0d 61 64 64 20 30 20 | 74 6f 20 69 74 65 6d 20 |n.add 0 |to item |
|00002d70| 32 20 6f 66 20 69 74 0d | 63 6c 69 63 6b 20 61 74 |2 of it.|click at|
|00002d80| 20 69 74 0d 74 79 70 65 | 20 22 31 37 31 39 35 2c | it.type| "17195,|
|00002d90| 32 30 2e 32 35 2c 31 38 | 2e 35 2c 32 30 2e 31 32 |20.25,18|.5,20.12|
|00002da0| 35 22 26 72 65 74 75 72 | 6e 26 22 55 70 64 61 74 |5"&retur|n&"Updat|
|00002db0| 65 20 43 68 61 72 74 73 | 22 0d 67 65 74 20 74 68 |e Charts|".get th|
|00002dc0| 65 20 72 65 63 74 20 6f | 66 20 62 75 74 74 6f 6e |e rect o|f button|
|00002dd0| 20 6f 75 72 42 75 74 74 | 6f 6e 0d 63 68 6f 6f 73 | ourButt|on.choos|
|00002de0| 65 20 72 65 63 74 61 6e | 67 6c 65 20 74 6f 6f 6c |e rectan|gle tool|
|00002df0| 0d 64 72 61 67 20 66 72 | 6f 6d 20 69 74 65 6d 20 |.drag fr|om item |
|00002e00| 31 20 6f 66 20 69 74 2c | 69 74 65 6d 20 32 20 6f |1 of it,|item 2 o|
|00002e10| 66 20 69 74 20 74 6f 20 | 69 74 65 6d 20 33 20 6f |f it to |item 3 o|
|00002e20| 66 20 69 74 2c 69 74 65 | 6d 20 34 20 6f 66 20 69 |f it,ite|m 4 of i|
|00002e30| 74 0d 63 68 6f 6f 73 65 | 20 62 72 6f 77 73 65 20 |t.choose| browse |
|00002e40| 74 6f 6f 6c 0d 65 6e 64 | 20 64 72 61 77 54 65 78 |tool.end| drawTex|
|00002e50| 74 0d 0d 66 75 6e 63 74 | 69 6f 6e 20 66 69 6e 64 |t..funct|ion find|
|00002e60| 53 74 72 69 6e 67 20 53 | 65 61 72 63 68 4e 61 6d |String S|earchNam|
|00002e70| 65 2c 66 69 65 6c 64 4e | 61 6d 65 0d 67 6c 6f 62 |e,fieldN|ame.glob|
|00002e80| 61 6c 20 66 69 72 73 74 | 43 68 61 72 74 0d 73 65 |al first|Chart.se|
|00002e90| 74 20 63 75 72 73 6f 72 | 20 74 6f 20 34 0d 73 65 |t cursor| to 4.se|
|00002ea0| 74 20 6c 6f 63 6b 53 63 | 72 65 65 6e 20 74 6f 20 |t lockSc|reen to |
|00002eb0| 74 72 75 65 0d 67 6f 20 | 63 61 72 64 20 66 69 72 |true.go |card fir|
|00002ec0| 73 74 43 68 61 72 74 0d | 70 75 74 20 65 6d 70 74 |stChart.|put empt|
|00002ed0| 79 20 69 6e 74 6f 20 66 | 6f 75 6e 64 43 61 72 64 |y into f|oundCard|
|00002ee0| 0d 70 75 74 20 65 6d 70 | 74 79 20 69 6e 74 6f 20 |.put emp|ty into |
|00002ef0| 66 69 72 73 74 46 6f 75 | 6e 64 0d 70 75 74 20 22 |firstFou|nd.put "|
|00002f00| 78 22 20 69 6e 74 6f 20 | 69 74 0d 72 65 70 65 61 |x" into |it.repea|
|00002f10| 74 20 75 6e 74 69 6c 20 | 28 66 6f 75 6e 64 43 61 |t until |(foundCa|
|00002f20| 72 64 20 69 73 20 6e 6f | 74 20 65 6d 70 74 79 29 |rd is no|t empty)|
|00002f30| 20 6f 72 20 28 69 74 20 | 69 73 20 65 6d 70 74 79 | or (it |is empty|
|00002f40| 29 0d 70 75 74 20 65 6d | 70 74 79 20 69 6e 74 6f |).put em|pty into|
|00002f50| 20 69 74 0d 66 69 6e 64 | 20 73 65 61 72 63 68 4e | it.find| searchN|
|00002f60| 61 6d 65 20 69 6e 20 66 | 69 65 6c 64 20 66 69 65 |ame in f|ield fie|
|00002f70| 6c 64 4e 61 6d 65 0d 69 | 66 20 28 73 68 6f 72 74 |ldName.i|f (short|
|00002f80| 20 6e 61 6d 65 20 6f 66 | 20 74 68 69 73 20 62 61 | name of| this ba|
|00002f90| 63 6b 67 72 6f 75 6e 64 | 20 69 73 20 22 53 74 6f |ckground| is "Sto|
|00002fa0| 63 6b 20 43 68 61 72 74 | 22 29 20 6f 72 20 c2 0d |ck Chart|") or ..|
|00002fb0| 28 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 |(short n|ame of t|
|00002fc0| 68 69 73 20 62 61 63 6b | 67 72 6f 75 6e 64 20 69 |his back|ground i|
|00002fd0| 73 20 22 41 64 76 61 6e | 63 65 2d 44 65 63 6c 69 |s "Advan|ce-Decli|
|00002fe0| 6e 65 20 43 68 61 72 74 | 22 29 20 74 68 65 6e 0d |ne Chart|") then.|
|00002ff0| 67 65 74 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |get the |number o|
|00003000| 66 20 74 68 69 73 20 63 | 61 72 64 0d 69 66 20 66 |f this c|ard.if f|
|00003010| 69 65 6c 64 20 66 69 65 | 6c 64 4e 61 6d 65 3d 73 |ield fie|ldName=s|
|00003020| 65 61 72 63 68 4e 61 6d | 65 20 74 68 65 6e 0d 70 |earchNam|e then.p|
|00003030| 75 74 20 69 74 20 69 6e | 74 6f 20 66 6f 75 6e 64 |ut it in|to found|
|00003040| 43 61 72 64 0d 65 6c 73 | 65 0d 69 66 20 66 69 72 |Card.els|e.if fir|
|00003050| 73 74 46 6f 75 6e 64 20 | 69 73 20 65 6d 70 74 79 |stFound |is empty|
|00003060| 20 74 68 65 6e 0d 70 75 | 74 20 69 74 20 69 6e 74 | then.pu|t it int|
|00003070| 6f 20 66 69 72 73 74 46 | 6f 75 6e 64 0d 65 6c 73 |o firstF|ound.els|
|00003080| 65 0d 69 66 20 28 69 74 | 3c 66 69 72 73 74 43 68 |e.if (it|<firstCh|
|00003090| 61 72 74 29 20 6f 72 20 | 28 69 74 3d 66 69 72 73 |art) or |(it=firs|
|000030a0| 74 46 6f 75 6e 64 29 20 | 74 68 65 6e 0d 70 75 74 |tFound) |then.put|
|000030b0| 20 65 6d 70 74 79 20 69 | 6e 74 6f 20 69 74 20 2d | empty i|nto it -|
|000030c0| 2d 20 73 74 6f 70 20 77 | 68 65 6e 20 61 6c 6c 20 |- stop w|hen all |
|000030d0| 63 61 72 64 73 20 73 65 | 61 72 63 68 65 64 0d 65 |cards se|arched.e|
|000030e0| 6e 64 20 69 66 0d 65 6e | 64 20 69 66 0d 65 6e 64 |nd if.en|d if.end|
|000030f0| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 72 | if.end |if.end r|
|00003100| 65 70 65 61 74 0d 69 66 | 20 66 6f 75 6e 64 43 61 |epeat.if| foundCa|
|00003110| 72 64 20 69 73 20 65 6d | 70 74 79 20 74 68 65 6e |rd is em|pty then|
|00003120| 0d 67 6f 20 74 6f 20 63 | 61 72 64 20 22 54 69 74 |.go to c|ard "Tit|
|00003130| 6c 65 20 43 61 72 64 22 | 0d 61 6e 73 77 65 72 20 |le Card"|.answer |
|00003140| 73 65 61 72 63 68 4e 61 | 6d 65 26 26 22 6e 6f 74 |searchNa|me&&"not|
|00003150| 20 66 6f 75 6e 64 22 0d | 65 6e 64 20 69 66 0d 72 | found".|end if.r|
|00003160| 65 74 75 72 6e 20 66 6f | 75 6e 64 43 61 72 64 0d |eturn fo|undCard.|
|00003170| 73 65 74 20 6c 6f 63 6b | 53 63 72 65 65 6e 20 74 |set lock|Screen t|
|00003180| 6f 20 66 61 6c 73 65 0d | 65 6e 64 20 46 69 6e 64 |o false.|end Find|
|00003190| 53 74 72 69 6e 67 0d 0d | 66 75 6e 63 74 69 6f 6e |String..|function|
|000031a0| 20 46 69 6e 64 43 68 61 | 72 74 0d 61 6e 73 77 65 | FindCha|rt.answe|
|000031b0| 72 20 22 46 69 6e 64 20 | 43 68 61 72 74 20 62 79 |r "Find |Chart by|
|000031c0| 22 20 77 69 74 68 20 22 | 53 79 6d 62 6f 6c 22 20 |" with "|Symbol" |
|000031d0| 6f 72 20 22 4e 61 6d 65 | 22 20 6f 72 20 22 43 61 |or "Name|" or "Ca|
|000031e0| 6e 63 65 6c 22 0d 69 66 | 20 69 74 20 69 73 20 6e |ncel".if| it is n|
|000031f0| 6f 74 20 22 43 61 6e 63 | 65 6c 22 20 74 68 65 6e |ot "Canc|el" then|
|00003200| 0d 70 75 74 20 69 74 20 | 69 6e 74 6f 20 73 65 61 |.put it |into sea|
|00003210| 72 63 68 74 79 70 65 0d | 41 73 6b 20 22 57 68 61 |rchtype.|Ask "Wha|
|00003220| 74 20 69 73 20 74 68 65 | 22 26 26 73 65 61 72 63 |t is the|"&&searc|
|00003230| 68 54 79 70 65 26 26 22 | 66 6f 72 20 74 68 65 20 |hType&&"|for the |
|00003240| 43 68 61 72 74 22 0d 69 | 66 20 69 74 20 69 73 20 |Chart".i|f it is |
|00003250| 6e 6f 74 20 65 6d 70 74 | 79 20 74 68 65 6e 0d 70 |not empt|y then.p|
|00003260| 75 74 20 69 74 20 69 6e | 74 6f 20 53 65 61 72 63 |ut it in|to Searc|
|00003270| 68 4e 61 6d 65 0d 72 65 | 74 75 72 6e 20 66 69 6e |hName.re|turn fin|
|00003280| 64 53 74 72 69 6e 67 28 | 73 65 61 72 63 68 4e 61 |dString(|searchNa|
|00003290| 6d 65 2c 22 53 74 6f 63 | 6b 22 26 26 73 65 61 72 |me,"Stoc|k"&&sear|
|000032a0| 63 68 54 79 70 65 29 0d | 65 6c 73 65 0d 72 65 74 |chType).|else.ret|
|000032b0| 75 72 6e 20 65 6d 70 74 | 79 0d 65 6e 64 20 69 66 |urn empt|y.end if|
|000032c0| 20 2d 2d 20 69 74 0d 65 | 6c 73 65 0d 72 65 74 75 | -- it.e|lse.retu|
|000032d0| 72 6e 20 65 6d 70 74 79 | 0d 65 6e 64 20 69 66 20 |rn empty|.end if |
|000032e0| 2d 2d 20 43 61 6e 63 65 | 6c 0d 65 6e 64 20 46 69 |-- Cance|l.end Fi|
|000032f0| 6e 64 43 68 61 72 74 0d | 0d 66 75 6e 63 74 69 6f |ndChart.|.functio|
|00003300| 6e 20 41 73 6b 43 68 61 | 72 74 0d 67 6c 6f 62 61 |n AskCha|rt.globa|
|00003310| 6c 20 46 69 72 73 74 63 | 68 61 72 74 0d 41 6e 73 |l Firstc|hart.Ans|
|00003320| 77 65 72 20 22 53 74 61 | 72 74 20 77 69 74 68 22 |wer "Sta|rt with"|
|00003330| 20 77 69 74 68 20 22 43 | 61 6e 63 65 6c 22 20 6f | with "C|ancel" o|
|00003340| 72 20 22 53 70 65 63 69 | 66 69 63 20 63 68 61 72 |r "Speci|fic char|
|00003350| 74 22 20 6f 72 20 22 46 | 69 72 73 74 20 43 68 61 |t" or "F|irst Cha|
|00003360| 72 74 22 0d 69 66 20 69 | 74 20 69 73 20 6e 6f 74 |rt".if i|t is not|
|00003370| 20 22 43 61 6e 63 65 6c | 22 20 74 68 65 6e 0d 69 | "Cancel|" then.i|
|00003380| 66 20 69 74 20 69 73 20 | 22 46 69 72 73 74 20 43 |f it is |"First C|
|00003390| 68 61 72 74 22 20 74 68 | 65 6e 0d 72 65 74 75 72 |hart" th|en.retur|
|000033a0| 6e 20 66 69 72 73 74 43 | 68 61 72 74 0d 65 6c 73 |n firstC|hart.els|
|000033b0| 65 0d 72 65 74 75 72 6e | 20 66 69 6e 64 43 68 61 |e.return| findCha|
|000033c0| 72 74 28 29 0d 65 6e 64 | 20 69 66 0d 65 6c 73 65 |rt().end| if.else|
|000033d0| 0d 72 65 74 75 72 6e 20 | 65 6d 70 74 79 0d 65 6e |.return |empty.en|
|000033e0| 64 20 69 66 20 2d 2d 20 | 6e 6f 74 20 22 43 61 6e |d if -- |not "Can|
|000033f0| 63 65 6c 22 0d 65 6e 64 | 20 41 73 6b 43 68 61 72 |cel".end| AskChar|
|00003400| 74 0d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |t.......|........|
|00003410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003420| 00 00 04 a0 42 4d 41 50 | 00 00 10 27 00 00 00 00 |....BMAP|...'....|
|00003430| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |........|.V......|
|00003440| 01 56 02 00 00 1e 00 9d | 00 96 01 62 00 00 00 00 |.V......|...b....|
|00003450| 00 00 00 00 00 00 00 00 | 00 00 04 60 23 07 f0 25 |........|...`#..%|
|00003460| 03 80 53 03 fb fb ff 8f | c1 e0 1f f8 7f f3 ff 00 |..S.....|........|
|00003470| 7e 04 23 01 c0 25 03 80 | 54 e0 e0 e1 c3 80 c1 07 |~.#..%..|T.......|
|00003480| 1e 1c 38 e3 c1 c3 80 03 | 8a 2a 03 80 16 01 63 10 |..8.....|.*....c.|
|00003490| 00 20 02 20 42 04 e1 13 | c0 72 09 00 18 01 02 fd |. . B...|.r......|
|000034a0| 40 03 e1 1b 1a 04 8b 25 | 37 81 c1 fd f8 3c 01 80 |@......%|7....<..|
|000034b0| 7c 07 80 e1 01 25 7f c0 | c1 70 60 e7 03 81 ce 1c ||....%..|.p`.....|
|000034c0| e0 13 06 25 c0 01 06 8a | 65 86 20 00 a0 24 04 c1 |...%....|e. ..$..|
|000034d0| 00 48 04 90 00 1f 00 18 | 53 09 03 00 02 20 05 8b |.H......|S.... ..|
|000034e0| 25 0f 20 c1 48 a1 24 80 | 02 4e 24 90 17 19 42 1e |%. .H.$.|.N$...B.|
|000034f0| 62 e7 40 03 8a 27 01 40 | 24 07 80 13 06 63 e6 00 |b.@..'.@|$....c..|
|00003500| c0 11 80 42 04 17 24 25 | 07 f0 17 f8 42 09 01 bd |...B..$%|....B...|
|00003510| 80 03 27 02 80 e1 12 7e | 04 17 10 16 30 2a 04 80 |..'....~|....0*..|
|00003520| 05 78 01 00 80 02 46 24 | 50 34 c0 01 80 32 18 02 |.x....F$|P4...2..|
|00003530| 40 05 37 09 00 24 32 3a | 03 80 33 01 00 02 33 20 |@.7..$2:|..3...3 |
|00003540| 01 20 05 89 03 c3 07 f1 | ff f8 06 00 3c 0f e0 78 |. ......|....<..x|
|00003550| 07 80 03 fb fb ff 8f ff | 1f c0 7f f3 f8 70 05 a9 |........|.....p..|
|00003560| 81 1e 60 e1 01 1e 80 e1 | 01 5d 01 c5 8c 2c c0 0e |..`.....|.]...,..|
|00003570| 4e 8e 12 73 20 0e 4e 84 | 21 22 20 0e a2 85 4e 84 |N..s .N.|!" ...N.|
|00003580| 12 22 20 0e 5d 01 ce 0c | 77 70 0e ae 81 34 c0 00 |." .]...|wp...4..|
|00003590| 60 e1 09 43 01 9e 1e 30 | 35 03 01 80 13 73 16 c0 |`..C...0|5....s..|
|000035a0| 06 8a 24 10 02 26 04 02 | 14 b0 16 c0 06 89 13 03 |..$..&..|........|
|000035b0| c3 0e 1c 19 e1 f9 f1 c1 | c3 c3 e1 87 00 78 71 e7 |........|.....xq.|
|000035c0| de 1e f0 f8 e0 00 c7 c1 | c0 04 8a 04 c3 01 20 02 |........|...... .|
|000035d0| d2 ca 32 a2 a5 a0 50 0a | 80 b4 a9 24 d2 d3 69 19 |..2...P.|...$..i.|
|000035e0| 50 01 08 a2 a0 04 46 03 | 40 02 45 c1 55 56 80 a8 |P.....F.|@.E.UV..|
|000035f0| 15 40 0d 54 02 c1 01 a1 | 22 a8 01 09 05 60 04 04 |.@.T....|"....`..|
|00003600| c1 02 d0 01 80 00 01 c1 | c3 32 07 00 b8 52 0b 34 |........|.2...R.4|
|00003610| c0 00 e0 08 36 02 c2 d0 | c1 01 f1 f5 80 00 07 c0 |....6...|........|
|00003620| 74 43 01 60 00 f8 08 53 | 02 81 20 28 02 c2 e0 05 |tC.`...S|.. (....|
|00003630| 65 60 00 a8 15 80 c1 54 | 00 64 c8 00 02 b0 22 05 |e`.....T|.d....".|
|00003640| 60 04 04 c3 12 12 02 ca | f2 42 a2 a5 90 52 4a 80 |`.......|.B...RJ.|
|00003650| b4 a9 22 a0 01 65 21 51 | 81 29 92 a6 04 89 54 c0 |.."..e!Q|.)....T.|
|00003660| 00 60 03 18 2e 01 80 07 | 27 03 18 1e 03 08 27 01 |.`......|'.....'.|
|00003670| f0 e1 07 a8 81 16 f0 23 | 08 02 e1 04 75 01 08 43 |.......#|....u..C|
|00003680| 8e 38 12 09 14 86 12 0d | 14 40 07 05 c1 02 64 c4 |.8......|.@....d.|
|00003690| 51 44 23 18 80 13 82 12 | 11 0c 8a 26 e0 80 02 c2 |QD#.....|...&....|
|000036a0| 01 b0 18 eb 31 8c 60 60 | 73 2a a0 99 66 00 dc 60 |....1.``|s*..f..`|
|000036b0| 06 37 07 9f 7c c2 00 e0 | 1d c7 7b ce 70 f0 f7 aa |.7..|...|..{.p...|
|000036c0| b5 9c ef 00 8e f0 06 8b | 26 e0 04 73 a0 05 c3 4a |........|&..s...J|
|000036d0| 42 70 90 c1 17 aa b5 84 | 69 00 8e e0 06 8a 45 03 |Bp......|i.....E.|
|000036e0| 6c 00 c0 33 38 00 39 c1 | dc 00 70 70 00 1f 38 07 |l..38.9.|..pp..8.|
|000036f0| 12 10 06 89 46 f0 43 0e | 38 c2 12 09 1c e8 31 8e |....F.C.|8.....1.|
|00003700| e2 60 e3 10 8a 1d 06 10 | 52 62 06 4a 08 02 00 20 |.`......|Rb.J... |
|00003710| 19 10 08 1d c0 19 20 08 | a3 81 65 04 5e 87 9e f0 |...... .|..e.^...|
|00003720| 20 23 08 08 32 41 00 01 | 33 80 01 80 05 8a 56 0e | #..2A..|3.....V.|
|00003730| 03 ce 78 20 13 08 2a 03 | 80 05 0a c2 67 06 0b 31 |..x ..*.|....g..1|
|00003740| d9 d4 cb 31 82 ac c6 33 | b1 96 10 65 06 89 55 07 |...1...3|...e..U.|
|00003750| dc 87 9c f0 c2 28 01 0c | 4a 4a 09 2c 4a 41 30 29 |.....(..|JJ.,JA0)|
|00003760| 4a 48 58 a0 92 06 8b 28 | 40 28 c2 41 01 03 4b 90 |JHX....(|@(.A..K.|
|00003770| 55 23 4b 82 8c 2e 49 f8 | 46 50 f5 06 8a 09 c2 30 |U#K...I.|FP.....0|
|00003780| 07 0e 00 38 01 c0 e0 38 | 00 01 c0 38 03 80 60 07 |...8...8|...8..`.|
|00003790| 8b 56 0e 70 0e 28 08 12 | 4b c1 82 0d 20 4b 81 80 |.V.p.(..|K... K..|
|000037a0| 0e 48 22 50 f0 06 89 1e | 40 e1 01 2d 01 80 e1 01 |.H"P....|@..-....|
|000037b0| a2 81 28 20 08 e1 06 28 | 48 24 23 02 18 12 34 13 |..( ...(|H$#...4.|
|000037c0| 01 0a 28 8c 62 23 02 08 | 12 44 0e 08 c2 8a a2 63 |..(.b#..|.D.....c|
|000037d0| ac c6 33 89 81 cc ee 82 | 65 98 03 71 80 08 08 c2 |..3.....|e..q....|
|000037e0| 89 22 14 b1 29 0a 4a 42 | 12 44 54 16 24 01 4a 40 |."..).JB|.DT.$.J@|
|000037f0| 08 78 88 22 74 a1 ef 3a | 4b c1 c1 92 44 54 74 3c |.x."t..:|K...DTt<|
|00003800| 01 4a 09 8a 3a e0 00 e7 | c1 70 01 c1 c0 00 7c e0 |.J..:...|.p....|.|
|00003810| 1c 12 40 08 89 08 c2 48 | 24 73 a0 c6 3b 89 83 8c |..@....H|$s..;...|
|00003820| 42 28 74 18 41 49 88 08 | 48 20 08 00 80 19 40 0a |B(t.AI..|H ....@.|
|00003830| 1a 03 1a 80 0a a8 81 17 | 21 18 82 12 02 32 03 80 |........|!....2..|
|00003840| 20 07 17 21 18 82 35 04 | 40 60 07 8b 08 c2 1c 58 | ..!..5.|@`.....X|
|00003850| 71 74 44 71 73 80 00 38 | b9 c4 1c 58 0b c0 08 8a |qtDqs..8|...X....|
|00003860| 78 3e 3c f8 f0 00 f8 f7 | c1 c0 c6 7c 7b e4 3e 3c |x><.....|...|{.><|
|00003870| 08 09 07 c1 1e 00 20 00 | 86 ec f0 80 63 40 20 00 |...... .|....c@ .|
|00003880| 20 00 c0 08 17 1e 75 f0 | 03 80 6c 38 03 c0 22 01 | .....u.|..l8..".|
|00003890| 80 08 1b 03 c1 b8 00 03 | c0 00 3c 01 e0 12 03 09 |........|..<.....|
|000038a0| 4f 40 38 04 02 13 06 09 | 38 3e 00 f8 32 f0 07 c0 |O@8.....|8>..2...|
|000038b0| c1 00 7c 03 e0 3e 00 0b | c8 08 d1 97 a9 b1 4a 78 |..|..>..|......Jx|
|000038c0| 00 00 0c e0 42 4b 47 44 | 00 00 18 2b 00 00 1b c7 |....BKGD|...+....|
|000038d0| 00 00 00 00 00 00 00 01 | 00 00 0a 14 00 00 0c e5 |........|........|
|000038e0| 00 0b 00 0d 00 00 0c ac | 00 00 00 00 00 00 00 2c |........|.......,|
|000038f0| 00 01 02 80 00 52 00 67 | 00 8c 01 97 40 02 00 00 |.....R.g|....@...|
|00003900| 00 00 00 01 00 04 00 0c | 06 00 00 10 4c 6f 67 6f |........|....Logo|
|00003910| 20 46 72 61 6d 65 00 00 | 00 00 04 c6 00 02 01 00 | Frame..|........|
|00003920| 00 8e 01 09 00 a4 01 a3 | 80 03 00 00 00 00 00 01 |........|........|
|00003930| 00 00 00 0c 00 00 00 10 | 50 61 73 74 65 20 4c 6f |........|Paste Lo|
|00003940| 67 6f 20 6f 6e 20 49 6e | 76 6f 69 63 65 00 00 6f |go on In|voice..o|
|00003950| 6e 20 63 6f 70 79 50 69 | 63 74 75 72 65 0d 67 6c |n copyPi|cture.gl|
|00003960| 6f 62 61 6c 20 66 72 61 | 6d 65 4c 6f 63 0d 70 75 |obal fra|meLoc.pu|
|00003970| 74 20 74 68 65 20 6c 6f | 63 20 6f 66 20 66 69 65 |t the lo|c of fie|
|00003980| 6c 64 20 22 4c 6f 67 6f | 20 46 72 61 6d 65 22 20 |ld "Logo| Frame" |
|00003990| 69 6e 74 6f 20 66 72 61 | 6d 65 4c 6f 63 0d 63 68 |into fra|meLoc.ch|
|000039a0| 6f 6f 73 65 20 73 65 6c | 65 63 74 20 74 6f 6f 6c |oose sel|ect tool|
|000039b0| 0d 64 72 61 67 4c 6f 67 | 6f 46 72 61 6d 65 0d 64 |.dragLog|oFrame.d|
|000039c0| 6f 6d 65 6e 75 20 22 43 | 6f 70 79 20 50 69 63 74 |omenu "C|opy Pict|
|000039d0| 75 72 65 22 0d 63 6c 65 | 61 72 50 69 63 74 75 72 |ure".cle|arPictur|
|000039e0| 65 0d 64 6f 4d 65 6e 75 | 20 22 50 61 73 74 65 20 |e.doMenu| "Paste |
|000039f0| 50 69 63 74 75 72 65 22 | 0d 67 6f 20 74 6f 20 63 |Picture"|.go to c|
|00003a00| 61 72 64 20 22 49 6e 76 | 6f 69 63 65 20 4d 61 73 |ard "Inv|oice Mas|
|00003a10| 74 65 72 22 0d 68 69 64 | 65 20 66 69 65 6c 64 20 |ter".hid|e field |
|00003a20| 22 4c 6f 67 6f 20 46 72 | 61 6d 65 22 0d 73 65 74 |"Logo Fr|ame".set|
|00003a30| 20 65 64 69 74 62 6b 67 | 6e 64 20 74 6f 20 74 72 | editbkg|nd to tr|
|00003a40| 75 65 0d 64 6f 6d 65 6e | 75 20 22 50 61 73 74 65 |ue.domen|u "Paste|
|00003a50| 20 50 69 63 74 75 72 65 | 22 0d 70 75 74 20 74 68 | Picture|".put th|
|00003a60| 65 20 6c 6f 63 20 6f 66 | 20 66 69 65 6c 64 20 22 |e loc of| field "|
|00003a70| 4c 6f 67 6f 20 46 72 61 | 6d 65 22 20 69 6e 74 6f |Logo Fra|me" into|
|00003a80| 20 6e 65 77 46 72 61 6d | 65 4c 6f 63 0d 63 6c 69 | newFram|eLoc.cli|
|00003a90| 63 6b 20 61 74 20 66 72 | 61 6d 65 4c 6f 63 0d 64 |ck at fr|ameLoc.d|
|00003aa0| 72 61 67 20 66 72 6f 6d | 20 66 72 61 6d 65 4c 6f |rag from| frameLo|
|00003ab0| 63 20 74 6f 20 6e 65 77 | 46 72 61 6d 65 4c 6f 63 |c to new|FrameLoc|
|00003ac0| 0d 63 68 6f 6f 73 65 20 | 72 65 63 74 20 74 6f 6f |.choose |rect too|
|00003ad0| 6c 0d 64 72 61 67 4c 6f | 67 6f 46 72 61 6d 65 0d |l.dragLo|goFrame.|
|00003ae0| 65 6e 64 20 63 6f 70 79 | 50 69 63 74 75 72 65 0d |end copy|Picture.|
|00003af0| 0d 6f 6e 20 63 6f 70 79 | 54 65 78 74 0d 63 68 6f |.on copy|Text.cho|
|00003b00| 6f 73 65 20 66 69 65 6c | 64 20 74 6f 6f 6c 0d 70 |ose fiel|d tool.p|
|00003b10| 75 74 20 66 69 65 6c 64 | 20 22 4c 6f 67 6f 20 46 |ut field| "Logo F|
|00003b20| 72 61 6d 65 22 20 69 6e | 74 6f 20 74 68 65 54 65 |rame" in|to theTe|
|00003b30| 78 74 0d 63 6c 69 63 6b | 20 61 74 20 6c 6f 63 20 |xt.click| at loc |
|00003b40| 6f 66 20 66 69 65 6c 64 | 20 22 4c 6f 67 6f 20 46 |of field| "Logo F|
|00003b50| 72 61 6d 65 22 0d 64 6f | 4d 65 6e 75 20 22 43 6f |rame".do|Menu "Co|
|00003b60| 70 79 20 46 69 65 6c 64 | 22 0d 67 6f 20 63 61 72 |py Field|".go car|
|00003b70| 64 20 22 49 6e 76 6f 69 | 63 65 20 4d 61 73 74 65 |d "Invoi|ce Maste|
|00003b80| 72 22 0d 73 65 74 20 65 | 64 69 74 62 6b 67 6e 64 |r".set e|ditbkgnd|
|00003b90| 20 74 6f 20 74 72 75 65 | 0d 63 6c 65 61 72 50 69 | to true|.clearPi|
|00003ba0| 63 74 75 72 65 0d 73 68 | 6f 77 20 66 69 65 6c 64 |cture.sh|ow field|
|00003bb0| 20 22 4c 6f 67 6f 20 46 | 72 61 6d 65 22 0d 70 75 | "Logo F|rame".pu|
|00003bc0| 74 20 6c 6f 63 20 6f 66 | 20 66 69 65 6c 64 20 22 |t loc of| field "|
|00003bd0| 4c 6f 67 6f 20 46 72 61 | 6d 65 22 20 69 6e 74 6f |Logo Fra|me" into|
|00003be0| 20 6e 65 77 46 72 61 6d | 65 4c 6f 63 0d 63 6c 69 | newFram|eLoc.cli|
|00003bf0| 63 6b 20 61 74 20 6e 65 | 77 46 72 61 6d 65 4c 6f |ck at ne|wFrameLo|
|00003c00| 63 0d 64 6f 4d 65 6e 75 | 20 22 43 6c 65 61 72 20 |c.doMenu| "Clear |
|00003c10| 46 69 65 6c 64 22 0d 64 | 6f 4d 65 6e 75 20 22 50 |Field".d|oMenu "P|
|00003c20| 61 73 74 65 20 46 69 65 | 6c 64 22 0d 70 75 74 20 |aste Fie|ld".put |
|00003c30| 74 68 65 54 65 78 74 20 | 69 6e 74 6f 20 66 69 65 |theText |into fie|
|00003c40| 6c 64 20 22 4c 6f 67 6f | 20 46 72 61 6d 65 22 0d |ld "Logo| Frame".|
|00003c50| 73 65 74 20 6c 6f 63 20 | 6f 66 20 66 69 65 6c 64 |set loc |of field|
|00003c60| 20 22 4c 6f 67 6f 20 46 | 72 61 6d 65 22 20 74 6f | "Logo F|rame" to|
|00003c70| 20 6e 65 77 46 72 61 6d | 65 4c 6f 63 0d 73 65 74 | newFram|eLoc.set|
|00003c80| 20 73 68 6f 77 6c 69 6e | 65 73 20 6f 66 20 66 69 | showlin|es of fi|
|00003c90| 65 6c 64 20 22 4c 6f 67 | 6f 20 46 72 61 6d 65 22 |eld "Log|o Frame"|
|00003ca0| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6e 64 20 63 6f | to fals|e.end co|
|00003cb0| 70 79 54 65 78 74 0d 0d | 6f 6e 20 6d 6f 75 73 65 |pyText..|on mouse|
|00003cc0| 55 70 0d 67 6c 6f 62 61 | 6c 20 64 65 6c 65 74 65 |Up.globa|l delete|
|00003cd0| 46 6c 61 67 0d 68 69 64 | 65 20 74 6f 6f 6c 20 77 |Flag.hid|e tool w|
|00003ce0| 69 6e 64 6f 77 0d 73 65 | 74 20 6c 6f 63 6b 73 63 |indow.se|t locksc|
|00003cf0| 72 65 65 6e 20 74 6f 20 | 74 72 75 65 0d 70 75 74 |reen to |true.put|
|00003d00| 20 22 50 61 73 74 65 20 | 4c 6f 67 6f 22 20 69 6e | "Paste |Logo" in|
|00003d10| 74 6f 20 64 65 6c 65 74 | 65 46 6c 61 67 0d 69 66 |to delet|eFlag.if|
|00003d20| 20 66 69 65 6c 64 20 22 | 4c 6f 67 6f 20 46 72 61 | field "|Logo Fra|
|00003d30| 6d 65 22 20 69 73 20 65 | 6d 70 74 79 20 74 68 65 |me" is e|mpty the|
|00003d40| 6e 0d 63 6f 70 79 50 69 | 63 74 75 72 65 0d 65 6c |n.copyPi|cture.el|
|00003d50| 73 65 0d 63 6f 70 79 54 | 65 78 74 0d 65 6e 64 20 |se.copyT|ext.end |
|00003d60| 69 66 0d 70 75 74 20 65 | 6d 70 74 79 20 69 6e 74 |if.put e|mpty int|
|00003d70| 6f 20 64 65 6c 65 74 65 | 46 6c 61 67 0d 73 65 74 |o delete|Flag.set|
|00003d80| 20 65 64 69 74 62 6b 67 | 6e 64 20 74 6f 20 66 61 | editbkg|nd to fa|
|00003d90| 6c 73 65 0d 63 68 6f 6f | 73 65 20 62 72 6f 77 73 |lse.choo|se brows|
|00003da0| 65 20 74 6f 6f 6c 0d 67 | 6f 20 63 61 72 64 20 70 |e tool.g|o card p|
|00003db0| 72 65 66 65 72 65 6e 63 | 65 73 0d 73 65 74 20 6c |referenc|es.set l|
|00003dc0| 6f 63 6b 73 63 72 65 65 | 6e 20 74 6f 20 66 61 6c |ockscree|n to fal|
|00003dd0| 73 65 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 0d 00 |se.end m|ouseUp..|
|00003de0| 01 12 00 04 02 02 00 cd | 00 9b 00 de 00 dd 20 02 |........|...... .|
|00003df0| 00 00 00 00 00 01 00 03 | 00 0a 01 00 00 0d 53 74 |........|......St|
|00003e00| 61 72 74 69 6e 67 20 49 | 6e 76 6f 69 63 65 20 4e |arting I|nvoice N|
|00003e10| 75 6d 62 65 72 00 00 6f | 6e 20 63 6c 6f 73 65 46 |umber..o|n closeF|
|00003e20| 69 65 6c 64 0d 67 6c 6f | 62 61 6c 20 6c 65 61 64 |ield.glo|bal lead|
|00003e30| 69 6e 67 5a 65 72 6f 73 | 0d 73 65 74 20 6e 75 6d |ingZeros|.set num|
|00003e40| 62 65 72 46 6f 72 6d 61 | 74 20 74 6f 20 6c 65 61 |berForma|t to lea|
|00003e50| 64 69 6e 67 5a 65 72 6f | 73 0d 67 65 74 20 74 61 |dingZero|s.get ta|
|00003e60| 72 67 65 74 0d 61 64 64 | 20 30 20 74 6f 20 69 74 |rget.add| 0 to it|
|00003e70| 0d 70 75 74 20 69 74 20 | 69 6e 74 6f 20 74 61 72 |.put it |into tar|
|00003e80| 67 65 74 0d 69 66 20 69 | 74 20 3e 20 66 69 65 6c |get.if i|t > fiel|
|00003e90| 64 20 22 48 69 67 68 65 | 73 74 20 49 6e 76 6f 69 |d "Highe|st Invoi|
|00003ea0| 63 65 20 4e 75 6d 62 65 | 72 22 20 74 68 65 6e 0d |ce Numbe|r" then.|
|00003eb0| 70 75 74 20 69 74 20 69 | 6e 74 6f 20 66 69 65 6c |put it i|nto fiel|
|00003ec0| 64 20 22 48 69 67 68 65 | 73 74 20 49 6e 76 6f 69 |d "Highe|st Invoi|
|00003ed0| 63 65 20 4e 75 6d 62 65 | 72 22 0d 65 6e 64 20 69 |ce Numbe|r".end i|
|00003ee0| 66 0d 65 6e 64 20 63 6c | 6f 73 65 46 69 65 6c 64 |f.end cl|oseField|
|00003ef0| 0d 00 00 38 00 05 02 01 | 00 cd 01 7b 00 de 01 b8 |...8....|...{....|
|00003f00| 20 00 00 00 00 00 00 01 | 00 03 00 0a 01 00 00 0d | .......|........|
|00003f10| 48 69 67 68 65 73 74 20 | 49 6e 76 6f 69 63 65 20 |Highest |Invoice |
|00003f20| 4e 75 6d 62 65 72 00 00 | 0d 00 01 16 00 06 02 02 |Number..|........|
|00003f30| 00 ee 00 9b 00 ff 00 de | 20 02 00 00 00 00 00 01 |........| .......|
|00003f40| 00 03 00 0a 01 00 00 0d | 53 74 61 72 74 69 6e 67 |........|Starting|
|00003f50| 20 43 75 73 74 6f 6d 65 | 72 20 4e 75 6d 62 65 72 | Custome|r Number|
|00003f60| 00 00 6f 6e 20 63 6c 6f | 73 65 46 69 65 6c 64 0d |..on clo|seField.|
|00003f70| 67 6c 6f 62 61 6c 20 6c | 65 61 64 69 6e 67 5a 65 |global l|eadingZe|
|00003f80| 72 6f 73 0d 73 65 74 20 | 6e 75 6d 62 65 72 46 6f |ros.set |numberFo|
|00003f90| 72 6d 61 74 20 74 6f 20 | 6c 65 61 64 69 6e 67 5a |rmat to |leadingZ|
|00003fa0| 65 72 6f 73 0d 67 65 74 | 20 74 61 72 67 65 74 0d |eros.get| target.|
|00003fb0| 61 64 64 20 30 20 74 6f | 20 69 74 0d 70 75 74 20 |add 0 to| it.put |
|00003fc0| 69 74 20 69 6e 74 6f 20 | 74 61 72 67 65 74 0d 69 |it into |target.i|
|00003fd0| 66 20 69 74 20 3e 20 66 | 69 65 6c 64 20 22 48 69 |f it > f|ield "Hi|
|00003fe0| 67 68 65 73 74 20 43 75 | 73 74 6f 6d 65 72 20 4e |ghest Cu|stomer N|
|00003ff0| 75 6d 62 65 72 22 20 74 | 68 65 6e 0d 70 75 74 20 |umber" t|hen.put |
|00004000| 69 74 20 69 6e 74 6f 20 | 66 69 65 6c 64 20 22 48 |it into |field "H|
|00004010| 69 67 68 65 73 74 20 43 | 75 73 74 6f 6d 65 72 20 |ighest C|ustomer |
|00004020| 4e 75 6d 62 65 72 22 0d | 65 6e 64 20 69 66 0d 65 |Number".|end if.e|
|00004030| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 0d 00 00 |nd close|Field...|
|00004040| 00 3a 00 07 02 01 00 ee | 01 7b 00 ff 01 b8 20 00 |.:......|.{.... .|
|00004050| 00 00 00 00 00 01 00 03 | 00 0a 01 00 00 0d 48 69 |........|......Hi|
|00004060| 67 68 65 73 74 20 43 75 | 73 74 6f 6d 65 72 20 4e |ghest Cu|stomer N|
|00004070| 75 6d 62 65 72 00 00 0d | 00 00 00 ee 00 08 02 02 |umber...|........|
|00004080| 01 0f 00 9b 01 20 00 d3 | 20 02 00 00 00 00 ff ff |..... ..| .......|
|00004090| 00 03 00 0a 01 00 00 0d | 43 6f 70 79 20 43 6f 75 |........|Copy Cou|
|000040a0| 6e 74 20 66 6f 72 20 49 | 6e 76 6f 69 63 65 73 00 |nt for I|nvoices.|
|000040b0| 00 6f 6e 20 63 6c 6f 73 | 65 46 69 65 6c 64 0d 67 |.on clos|eField.g|
|000040c0| 6c 6f 62 61 6c 20 69 6e | 76 6f 69 63 65 43 6f 70 |lobal in|voiceCop|
|000040d0| 69 65 73 0d 67 65 74 20 | 74 61 72 67 65 74 0d 69 |ies.get |target.i|
|000040e0| 66 20 69 74 20 3c 20 31 | 20 74 68 65 6e 0d 70 75 |f it < 1| then.pu|
|000040f0| 74 20 31 20 69 6e 74 6f | 20 69 74 0d 65 6c 73 65 |t 1 into| it.else|
|00004100| 0d 69 66 20 69 74 3e 39 | 20 74 68 65 6e 0d 70 75 |.if it>9| then.pu|
|00004110| 74 20 39 20 69 6e 74 6f | 20 69 74 0d 65 6e 64 20 |t 9 into| it.end |
|00004120| 69 66 0d 65 6e 64 20 69 | 66 0d 70 75 74 20 69 74 |if.end i|f.put it|
|00004130| 20 69 6e 74 6f 20 69 6e | 76 6f 69 63 65 43 6f 70 | into in|voiceCop|
|00004140| 69 65 73 0d 70 75 74 20 | 69 74 20 69 6e 74 6f 20 |ies.put |it into |
|00004150| 74 61 72 67 65 74 0d 65 | 6e 64 20 63 6c 6f 73 65 |target.e|nd close|
|00004160| 46 69 65 6c 64 0d 00 00 | 00 58 00 09 01 00 00 1a |Field...|.X......|
|00004170| 01 e2 00 35 02 00 20 00 | 00 00 77 5d 00 01 00 00 |...5.. .|..w]....|
|00004180| 00 0c 00 00 00 10 54 69 | 74 6c 65 20 43 61 72 64 |......Ti|tle Card|
|00004190| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 67 6f 20 |..on mou|seUp.go |
|000041a0| 63 61 72 64 20 22 54 69 | 74 6c 65 20 43 61 72 64 |card "Ti|tle Card|
|000041b0| 22 0d 65 6e 64 20 6d 6f | 75 73 65 55 70 0d 00 00 |".end mo|useUp...|
|000041c0| 00 5e 00 0a 01 00 00 00 | 01 e2 00 1b 02 00 00 00 |.^......|........|
|000041d0| 00 00 4e 82 00 01 00 00 | 00 0c 00 00 00 10 48 6f |..N.....|......Ho|
|000041e0| 6d 65 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 76 |me..on m|ouseUp.v|
|000041f0| 69 73 75 61 6c 20 65 66 | 66 65 63 74 20 69 72 69 |isual ef|fect iri|
|00004200| 73 20 63 6c 6f 73 65 0d | 67 6f 20 68 6f 6d 65 0d |s close.|go home.|
|00004210| 65 6e 64 20 6d 6f 75 73 | 65 55 70 0d 00 00 01 b8 |end mous|eUp.....|
|00004220| 00 0b 01 00 00 8e 00 b3 | 00 a4 01 03 80 03 00 00 |........|........|
|00004230| 00 00 00 01 00 00 00 0c | 00 00 00 10 54 79 70 65 |........|....Type|
|00004240| 20 4c 6f 67 6f 00 00 6f | 6e 20 6d 6f 75 73 65 55 | Logo..o|n mouseU|
|00004250| 70 0d 41 6e 73 77 65 72 | 20 22 50 72 65 73 73 20 |p.Answer| "Press |
|00004260| 54 41 42 20 77 68 65 6e | 20 64 6f 6e 65 22 20 77 |TAB when| done" w|
|00004270| 69 74 68 20 22 43 61 6e | 63 65 6c 22 20 6f 72 20 |ith "Can|cel" or |
|00004280| 22 4f 4b 22 0d 69 66 20 | 69 74 20 69 73 20 22 43 |"OK".if |it is "C|
|00004290| 61 6e 63 65 6c 22 20 74 | 68 65 6e 20 65 78 69 74 |ancel" t|hen exit|
|000042a0| 20 6d 6f 75 73 65 55 70 | 0d 63 6c 65 61 72 50 69 | mouseUp|.clearPi|
|000042b0| 63 74 75 72 65 0d 73 68 | 6f 77 20 66 69 65 6c 64 |cture.sh|ow field|
|000042c0| 20 22 4c 6f 67 6f 20 46 | 72 61 6d 65 22 0d 73 65 | "Logo F|rame".se|
|000042d0| 74 20 6c 6f 63 6b 54 65 | 78 74 20 6f 66 20 66 69 |t lockTe|xt of fi|
|000042e0| 65 6c 64 20 22 4c 6f 67 | 6f 20 46 72 61 6d 65 22 |eld "Log|o Frame"|
|000042f0| 20 74 6f 20 66 61 6c 73 | 65 0d 63 6c 69 63 6b 20 | to fals|e.click |
|00004300| 61 74 20 6c 6f 63 20 6f | 66 20 66 69 65 6c 64 20 |at loc o|f field |
|00004310| 22 4c 6f 67 6f 20 46 72 | 61 6d 65 22 0d 74 79 70 |"Logo Fr|ame".typ|
|00004320| 65 20 22 74 22 20 77 69 | 74 68 20 63 6f 6d 6d 61 |e "t" wi|th comma|
|00004330| 6e 64 6b 65 79 0d 67 65 | 74 20 6e 75 6d 62 65 72 |ndkey.ge|t number|
|00004340| 20 6f 66 20 6c 69 6e 65 | 73 20 6f 66 20 66 69 65 | of line|s of fie|
|00004350| 6c 64 20 22 4c 6f 67 6f | 20 46 72 61 6d 65 22 0d |ld "Logo| Frame".|
|00004360| 69 66 20 69 74 20 3e 20 | 30 20 74 68 65 6e 0d 73 |if it > |0 then.s|
|00004370| 65 6c 65 63 74 20 6c 69 | 6e 65 20 31 20 74 6f 20 |elect li|ne 1 to |
|00004380| 69 74 20 6f 66 20 66 69 | 65 6c 64 20 22 4c 6f 67 |it of fi|eld "Log|
|00004390| 6f 20 46 72 61 6d 65 22 | 0d 65 6c 73 65 0d 63 6c |o Frame"|.else.cl|
|000043a0| 69 63 6b 20 61 74 20 6c | 6f 63 20 6f 66 20 66 69 |ick at l|oc of fi|
|000043b0| 65 6c 64 20 22 4c 6f 67 | 6f 20 46 72 61 6d 65 22 |eld "Log|o Frame"|
|000043c0| 0d 65 6e 64 20 69 66 0d | 65 6e 64 20 6d 6f 75 73 |.end if.|end mous|
|000043d0| 65 55 70 0d 00 00 01 c4 | 00 0c 01 00 00 8e 00 5d |eUp.....|.......]|
|000043e0| 00 a4 00 ad 80 03 00 00 | 00 00 00 01 00 00 00 0c |........|........|
|000043f0| 00 00 00 10 44 72 61 77 | 20 4c 6f 67 6f 00 00 6f |....Draw| Logo..o|
|00004400| 6e 20 6d 6f 75 73 65 55 | 70 0d 67 6c 6f 62 61 6c |n mouseU|p.global|
|00004410| 20 6f 6c 64 54 6f 6f 6c | 57 69 6e 64 6f 77 4c 6f | oldTool|WindowLo|
|00004420| 63 0d 69 66 20 66 69 65 | 6c 64 20 22 4c 6f 67 6f |c.if fie|ld "Logo|
|00004430| 20 46 72 61 6d 65 22 20 | 69 73 20 6e 6f 74 20 65 | Frame" |is not e|
|00004440| 6d 70 74 79 20 74 68 65 | 6e 0d 41 6e 73 77 65 72 |mpty the|n.Answer|
|00004450| 20 22 59 6f 75 72 20 74 | 79 70 65 64 20 6c 6f 67 | "Your t|yped log|
|00004460| 6f 20 77 69 6c 6c 20 62 | 65 20 64 65 6c 65 74 65 |o will b|e delete|
|00004470| 64 22 20 77 69 74 68 20 | 22 43 61 6e 63 65 6c 22 |d" with |"Cancel"|
|00004480| 20 6f 72 20 22 4f 4b 22 | 0d 69 66 20 69 74 20 69 | or "OK"|.if it i|
|00004490| 73 20 22 43 61 6e 63 65 | 6c 22 20 74 68 65 6e 20 |s "Cance|l" then |
|000044a0| 65 78 69 74 20 6d 6f 75 | 73 65 55 70 0d 65 6e 64 |exit mou|seUp.end|
|000044b0| 20 69 66 0d 68 69 64 65 | 20 66 69 65 6c 64 20 22 | if.hide| field "|
|000044c0| 4c 6f 67 6f 20 46 72 61 | 6d 65 22 0d 70 75 74 20 |Logo Fra|me".put |
|000044d0| 65 6d 70 74 79 20 69 6e | 74 6f 20 66 69 65 6c 64 |empty in|to field|
|000044e0| 20 22 4c 6f 67 6f 20 46 | 72 61 6d 65 22 0d 63 68 | "Logo F|rame".ch|
|000044f0| 6f 6f 73 65 20 72 65 63 | 74 20 74 6f 6f 6c 0d 64 |oose rec|t tool.d|
|00004500| 72 61 67 4c 6f 67 6f 46 | 72 61 6d 65 0d 63 68 6f |ragLogoF|rame.cho|
|00004510| 6f 73 65 20 62 72 6f 77 | 73 65 20 74 6f 6f 6c 0d |ose brow|se tool.|
|00004520| 73 65 74 20 6c 6f 63 20 | 6f 66 20 74 6f 6f 6c 20 |set loc |of tool |
|00004530| 77 69 6e 64 6f 77 20 74 | 6f 20 6c 6f 63 20 6f 66 |window t|o loc of|
|00004540| 20 74 61 72 67 65 74 0d | 73 68 6f 77 20 74 6f 6f | target.|show too|
|00004550| 6c 20 77 69 6e 64 6f 77 | 0d 41 6e 73 77 65 72 20 |l window|.Answer |
|00004560| 22 57 68 65 6e 20 64 6f | 6e 65 2c 20 63 6c 69 63 |"When do|ne, clic|
|00004570| 6b 20 68 61 6e 64 20 6f | 72 20 70 72 65 73 73 20 |k hand o|r press |
|00004580| 43 4f 4d 4d 41 4e 44 2d | 54 41 42 22 0d 65 6e 64 |COMMAND-|TAB".end|
|00004590| 20 6d 6f 75 73 65 55 70 | 0d 00 00 00 00 00 00 00 | mouseUp|........|
|000045a0| 00 00 04 40 42 4d 41 50 | 00 00 1b c7 00 00 00 00 |...@BMAP|........|
|000045b0| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |........|.V......|
|000045c0| 01 56 02 00 00 1e 00 13 | 01 1f 01 75 00 00 00 00 |.V......|...u....|
|000045d0| 00 00 00 00 00 00 00 00 | 00 00 03 ec e1 23 07 f0 |........|.....#..|
|000045e0| 25 03 80 53 03 fb fb ff | 8f c1 e0 1f f8 7f f3 ff |%..S....|........|
|000045f0| 00 7e 04 e1 23 01 c0 25 | 03 80 54 e0 e0 e1 c3 80 |.~..#..%|..T.....|
|00004600| c1 07 1e 1c 38 e3 c1 c3 | 80 03 8a e1 2a 03 80 16 |....8...|....*...|
|00004610| 01 63 10 00 20 02 20 42 | 04 e2 13 c0 72 09 00 18 |.c.. . B|....r...|
|00004620| 01 02 fd 40 03 e2 1b 1a | 04 8b e1 25 37 81 c1 fd |...@....|...%7...|
|00004630| f8 3c 01 80 7c 07 80 e1 | 01 e1 25 7f c0 c1 70 60 |.<..|...|..%...p`|
|00004640| e7 03 81 ce 1c e0 13 06 | 25 c0 01 06 8a e1 65 86 |........|%.....e.|
|00004650| 20 00 a0 24 04 c1 00 48 | 04 90 00 1f 00 18 53 09 | ..$...H|......S.|
|00004660| 03 00 02 20 05 8b e1 25 | 0f 20 c1 48 a1 24 80 02 |... ...%|. .H.$..|
|00004670| 4e 24 90 17 19 42 1e 62 | e7 40 03 8a e1 27 01 40 |N$...B.b|.@...'.@|
|00004680| 24 07 80 13 06 63 e6 00 | c0 11 80 42 04 e1 17 24 |$....c..|...B...$|
|00004690| 25 07 f0 17 f8 42 09 01 | bd 80 03 e1 27 02 80 e1 |%....B..|....'...|
|000046a0| 12 7e 04 e1 17 10 16 30 | 2a 04 80 05 e1 78 01 00 |.~.....0|*....x..|
|000046b0| 80 02 46 24 50 34 c0 01 | 80 32 18 02 40 05 e1 37 |..F$P4..|.2..@..7|
|000046c0| 09 00 24 32 3a 03 80 33 | 01 00 02 33 20 01 20 05 |..$2:..3|...3 . .|
|000046d0| 89 e1 03 c3 07 f1 ff f8 | 06 00 3c 0f e0 78 07 80 |........|..<..x..|
|000046e0| 03 fb fb ff 8f ff 1f c0 | 7f f3 f8 70 05 aa 81 e1 |........|...p....|
|000046f0| 5a 07 e0 00 01 c0 e1 01 | e1 4a 03 30 00 03 e1 02 |Z.......|.J.0....|
|00004700| e1 3a 03 19 f1 c1 c7 87 | 0f 8e 1f 07 0e 1e 0b e1 |.:......|........|
|00004710| 3a 03 1b c3 c1 63 0d 9e | 1b 3d 8d 9b 33 0b e1 3a |:....c..|.=..3..:|
|00004720| 03 31 86 c1 33 18 cc 31 | 99 98 31 b0 0b e1 3a 03 |.1..3..1|..1...:.|
|00004730| e1 87 c1 f3 1f cc 3f 99 | 98 3f 9e 0b e1 3a 03 01 |......?.|.?...:..|
|00004740| 86 c1 03 18 0c 30 19 98 | 30 03 0b 8a e1 1c 05 c1 |.....0..|0.......|
|00004750| 60 15 80 2b 00 15 ab 30 | 0b 89 e1 3a 07 83 c1 c1 |`..+...0|...:....|
|00004760| c7 87 1e 0e 3f c7 0e 1e | 0b bf 81 bf 81 bf 81 bf |....?...|........|
|00004770| 81 b6 81 13 01 c1 c4 00 | 08 80 00 20 00 01 32 88 |........|... ..2.|
|00004780| 00 02 0f c1 11 20 10 00 | 10 20 00 01 32 88 00 02 |..... ..|. ..2...|
|00004790| 03 8a 23 03 e0 12 80 13 | 01 12 40 e1 12 20 15 01 |..#.....|..@.. ..|
|000047a0| 12 40 05 74 2a 62 d5 8e | 38 03 91 c1 33 18 c0 01 |.@.t*b..|8...3...|
|000047b0| 27 61 8c 58 7e 63 8c 63 | 28 03 91 33 c1 18 c0 01 |'a.X~c.c|(..3....|
|000047c0| 27 61 8c 58 00 89 03 c2 | 01 c4 93 08 89 48 22 51 |'a.X....|.....H"Q|
|000047d0| 49 25 20 a9 24 92 52 60 | 0d c2 1f 24 92 94 90 22 |I% .$.R`|...$..."|
|000047e0| 51 49 25 20 a9 24 92 52 | 60 00 8a 33 01 e0 e1 44 |QI% .$.R|`..3...D|
|000047f0| 1b 00 04 c0 23 0c 20 1d | 0e 72 67 80 00 1b 00 04 |....#. .|.rg.....|
|00004800| c0 33 0c 20 00 15 e0 27 | e0 30 12 0e e1 21 73 80 |.3. ...'|.0...!s.|
|00004810| 24 e0 30 12 0e 02 13 02 | 46 0e 00 04 20 13 02 e1 |$.0.....|F... ...|
|00004820| 11 14 42 0e 00 04 20 13 | 02 02 63 03 e6 e0 0c 00 |..B... .|..c.....|
|00004830| 70 72 78 3d e0 11 c0 01 | de 4f 07 00 f7 98 72 78 |prx=....|.O....rx|
|00004840| 3d e0 11 c0 01 de 02 89 | 18 08 e1 19 80 0d 18 30 |=.......|.......0|
|00004850| e1 18 03 0e b7 81 12 0e | c1 20 00 44 00 01 c0 00 |........|. .D....|
|00004860| 80 33 88 00 02 0e c1 89 | 00 80 00 81 c0 00 80 33 |.3......|.......3|
|00004870| 88 00 02 03 8a 12 1f 42 | 04 00 03 e0 15 40 e1 10 |.......B|.....@..|
|00004880| 01 23 03 e0 15 40 05 89 | 12 10 c2 73 16 ec 71 c2 |.#...@..|...s..q.|
|00004890| 04 99 cc 76 31 60 c9 27 | 63 8c 58 1c 8b c2 1c e3 |...v1`.'|c.X.....|
|000048a0| 19 c2 04 99 cc 76 31 60 | c9 27 63 8c 58 00 12 0e |.....v1`|.'c.X...|
|000048b0| c2 24 98 44 4a 42 04 a4 | 92 49 49 80 a9 24 92 52 |.$.DJB..|.II..$.R|
|000048c0| 60 1c f9 c2 24 94 a4 82 | 04 a4 92 49 49 80 a9 24 |`...$...|...II..$|
|000048d0| 92 52 60 00 8a 32 0f 07 | 08 14 3c 22 30 80 23 0c |.R`..2..|..<"0.#.|
|000048e0| 20 4c 70 00 03 3c 12 3c | 22 30 80 33 0c 20 00 13 | Lp..<.<|"0.3. ..|
|000048f0| 07 15 1c 32 38 00 30 12 | 0e 2f 03 9c 12 1c 32 38 |...28.0.|./....28|
|00004900| 00 30 12 0e 02 12 10 25 | 20 20 12 08 14 02 e1 40 |.0.....%| .....@|
|00004910| a0 00 20 20 12 08 14 02 | 02 02 c2 1f 37 00 60 03 |.. ....|....7.`.|
|00004920| 83 e7 3c de 00 78 00 11 | c0 01 de 6e 38 07 bc c3 |..<..x..|...n8...|
|00004930| e7 3c c1 de 00 78 00 11 | c0 01 de 02 89 17 40 e1 |.<...x..|......@.|
|00004940| 18 04 0f 26 01 80 e1 18 | 18 0f b7 81 14 07 72 01 |...&....|......r.|
|00004950| c0 00 02 03 00 01 12 08 | e1 0f 24 08 80 c1 00 02 |........|..$.....|
|00004960| 20 00 02 04 00 01 e2 02 | 74 08 18 e2 42 06 24 e7 | .......|t...B.$.|
|00004970| c1 0e 62 c1 1c 89 98 c6 | 30 e1 0d 74 08 24 92 42 |..b.....|0..t.$.B|
|00004980| 09 24 92 c1 04 93 01 12 | 8a 49 29 48 e1 0d 8a 1c |.$......|.I)H....|
|00004990| 01 42 d8 00 26 78 e1 0d | e1 21 07 38 e1 0d 15 80 |.B..&x..|.!.8....|
|000049a0| 12 20 46 70 00 21 40 e1 | 0d 89 74 07 18 e1 c1 c6 |. Fp.!@.|..t.....|
|000049b0| 1c 91 c1 04 62 01 12 21 | 88 c6 30 e1 0d 26 80 40 |....b..!|..0..&.@|
|000049c0| e2 08 26 81 80 e2 08 6c | 64 20 22 53 61 6c 65 73 |..&....l|d "Sales|
|000049d0| 20 54 61 78 22 0d 65 6e | 64 20 63 61 6c 63 54 61 | Tax".en|d calcTa|
|000049e0| 00 00 39 a0 42 4b 47 44 | 00 00 0a 14 00 00 0e 48 |..9.BKGD|.......H|
|000049f0| 40 00 00 00 00 00 00 02 | 00 00 0d 0f 00 00 18 2b |@.......|.......+|
|00004a00| 00 37 00 52 00 00 1a 38 | 00 00 00 00 00 00 00 30 |.7.R...8|.......0|
|00004a10| 00 01 02 01 00 41 00 4b | 00 52 00 83 00 00 00 00 |.....A.K|.R......|
|00004a20| 00 00 00 00 00 03 00 0a | 01 00 00 0d 49 6e 76 6f |........|....Invo|
|00004a30| 69 63 65 20 4e 75 6d 62 | 65 72 00 00 00 00 00 26 |ice Numb|er.....&|
|00004a40| 00 02 02 01 00 41 01 68 | 00 52 01 ee 00 00 00 00 |.....A.h|.R......|
|00004a50| 00 00 00 00 00 03 00 0a | 01 00 00 0d 44 61 74 65 |........|....Date|
|00004a60| 00 00 00 00 00 2a 00 03 | 02 01 00 60 00 0a 00 9d |.....*..|...`....|
|00004a70| 00 e1 60 02 00 00 00 00 | 00 00 00 03 00 0a 00 00 |..`.....|........|
|00004a80| 00 0d 53 65 6c 6c 20 74 | 6f 3a 00 00 00 00 00 2a |..Sell t|o:.....*|
|00004a90| 00 04 02 01 00 60 01 19 | 00 9d 01 f0 60 02 00 00 |.....`..|....`...|
|00004aa0| 00 00 00 00 00 03 00 0a | 00 00 00 0d 53 68 69 70 |........|....Ship|
|00004ab0| 20 74 6f 3a 00 00 00 00 | 00 5c 00 05 02 00 00 a8 | to:....|.\......|
|00004ac0| 00 2d 00 b8 00 58 00 02 | 00 00 00 00 ff ff 00 03 |.-...X..|........|
|00004ad0| 00 0a 00 00 00 0d 55 6e | 69 74 73 20 31 00 00 6f |......Un|its 1..o|
|00004ae0| 6e 20 63 6c 6f 73 65 46 | 69 65 6c 64 0d 73 65 74 |n closeF|ield.set|
|00004af0| 75 6e 69 74 46 6f 72 6d | 61 74 0d 43 61 6c 63 4c |unitForm|at.CalcL|
|00004b00| 69 6e 65 0d 65 6e 64 20 | 63 6c 6f 73 65 46 69 65 |ine.end |closeFie|
|00004b10| 6c 64 00 00 00 28 00 06 | 02 00 00 a8 00 57 00 b8 |ld...(..|.....W..|
|00004b20| 01 5a 00 02 00 00 00 00 | 00 00 00 03 00 0a 00 00 |.Z......|........|
|00004b30| 00 0d 49 74 65 6d 20 31 | 00 00 00 00 00 62 00 07 |..Item 1|.....b..|
|00004b40| 02 00 00 a8 01 59 00 b8 | 01 9d 00 02 00 00 00 00 |.....Y..|........|
|00004b50| ff ff 00 03 00 0a 00 00 | 00 0d 49 74 65 6d 20 50 |........|..Item P|
|00004b60| 72 69 63 65 20 31 00 00 | 6f 6e 20 63 6c 6f 73 65 |rice 1..|on close|
|00004b70| 46 69 65 6c 64 0d 73 65 | 74 44 6f 6c 6c 61 72 46 |Field.se|tDollarF|
|00004b80| 6f 72 6d 61 74 0d 43 61 | 6c 63 4c 69 6e 65 0d 65 |ormat.Ca|lcLine.e|
|00004b90| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 30 |nd close|Field..0|
|00004ba0| 00 09 02 01 00 a8 01 9c | 00 b8 01 e0 00 02 00 00 |........|........|
|00004bb0| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 51 75 61 6e |........|....Quan|
|00004bc0| 69 74 79 20 50 72 69 63 | 65 20 31 00 00 00 00 5c |ity Pric|e 1....\|
|00004bd0| 00 12 02 00 00 b7 00 2d | 00 c7 00 58 00 02 00 00 |.......-|...X....|
|00004be0| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 55 6e 69 74 |........|....Unit|
|00004bf0| 73 20 31 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |s 1..on |closeFie|
|00004c00| 6c 64 0d 73 65 74 75 6e | 69 74 46 6f 72 6d 61 74 |ld.setun|itFormat|
|00004c10| 0d 43 61 6c 63 4c 69 6e | 65 0d 65 6e 64 20 63 6c |.CalcLin|e.end cl|
|00004c20| 6f 73 65 46 69 65 6c 64 | 00 00 00 28 00 13 02 00 |oseField|...(....|
|00004c30| 00 b7 00 57 00 c7 01 5a | 00 02 00 00 00 00 00 00 |...W...Z|........|
|00004c40| 00 03 00 0a 00 00 00 0d | 49 74 65 6d 20 31 00 00 |........|Item 1..|
|00004c50| 00 00 00 62 00 14 02 00 | 00 b7 01 59 00 c7 01 9d |...b....|...Y....|
|00004c60| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|00004c70| 49 74 65 6d 20 50 72 69 | 63 65 20 31 00 00 6f 6e |Item Pri|ce 1..on|
|00004c80| 20 63 6c 6f 73 65 46 69 | 65 6c 64 0d 73 65 74 44 | closeFi|eld.setD|
|00004c90| 6f 6c 6c 61 72 46 6f 72 | 6d 61 74 0d 43 61 6c 63 |ollarFor|mat.Calc|
|00004ca0| 4c 69 6e 65 0d 65 6e 64 | 20 63 6c 6f 73 65 46 69 |Line.end| closeFi|
|00004cb0| 65 6c 64 00 00 da 00 15 | 02 01 00 b7 01 9c 00 c7 |eld.....|........|
|00004cc0| 01 e0 00 02 00 00 00 00 | ff ff 00 03 00 0a 00 00 |........|........|
|00004cd0| 00 0d 51 75 61 6e 69 74 | 79 20 50 72 69 63 65 20 |..Quanit|y Price |
|00004ce0| 31 00 00 6f 6e 20 63 6c | 6f 73 65 46 69 65 6c 64 |1..on cl|oseField|
|00004cf0| 0d 67 6c 6f 62 61 6c 20 | 64 6f 6c 6c 61 72 73 41 |.global |dollarsA|
|00004d00| 6e 64 43 65 6e 74 73 0d | 73 65 74 20 6e 75 6d 62 |ndCents.|set numb|
|00004d10| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 64 6f 6c 6c |erFormat| to doll|
|00004d20| 61 72 73 41 6e 64 43 65 | 6e 74 73 0d 70 75 74 20 |arsAndCe|nts.put |
|00004d30| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|00004d40| 65 20 74 61 72 67 65 74 | 20 69 6e 74 6f 20 6e 72 |e target| into nr|
|00004d50| 0d 67 65 74 20 66 69 65 | 6c 64 20 6e 72 0d 61 64 |.get fie|ld nr.ad|
|00004d60| 64 20 30 20 74 6f 20 69 | 74 0d 70 75 74 20 69 74 |d 0 to i|t.put it|
|00004d70| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 6e 72 0d 65 | into fi|eld nr.e|
|00004d80| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 5c |nd close|Field..\|
|00004d90| 00 16 02 00 00 c6 00 2d | 00 d6 00 58 00 02 00 00 |.......-|...X....|
|00004da0| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 55 6e 69 74 |........|....Unit|
|00004db0| 73 20 31 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |s 1..on |closeFie|
|00004dc0| 6c 64 0d 73 65 74 75 6e | 69 74 46 6f 72 6d 61 74 |ld.setun|itFormat|
|00004dd0| 0d 43 61 6c 63 4c 69 6e | 65 0d 65 6e 64 20 63 6c |.CalcLin|e.end cl|
|00004de0| 6f 73 65 46 69 65 6c 64 | 00 00 00 28 00 17 02 00 |oseField|...(....|
|00004df0| 00 c6 00 57 00 d6 01 5a | 00 02 00 00 00 00 00 00 |...W...Z|........|
|00004e00| 00 03 00 0a 00 00 00 0d | 49 74 65 6d 20 31 00 00 |........|Item 1..|
|00004e10| 00 00 00 62 00 18 02 00 | 00 c6 01 59 00 d6 01 9d |...b....|...Y....|
|00004e20| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|00004e30| 49 74 65 6d 20 50 72 69 | 63 65 20 31 00 00 6f 6e |Item Pri|ce 1..on|
|00004e40| 20 63 6c 6f 73 65 46 69 | 65 6c 64 0d 73 65 74 44 | closeFi|eld.setD|
|00004e50| 6f 6c 6c 61 72 46 6f 72 | 6d 61 74 0d 43 61 6c 63 |ollarFor|mat.Calc|
|00004e60| 4c 69 6e 65 0d 65 6e 64 | 20 63 6c 6f 73 65 46 69 |Line.end| closeFi|
|00004e70| 65 6c 64 00 00 da 00 19 | 02 01 00 c6 01 9c 00 d6 |eld.....|........|
|00004e80| 01 e0 00 02 00 00 00 00 | ff ff 00 03 00 0a 00 00 |........|........|
|00004e90| 00 0d 51 75 61 6e 69 74 | 79 20 50 72 69 63 65 20 |..Quanit|y Price |
|00004ea0| 31 00 00 6f 6e 20 63 6c | 6f 73 65 46 69 65 6c 64 |1..on cl|oseField|
|00004eb0| 0d 67 6c 6f 62 61 6c 20 | 64 6f 6c 6c 61 72 73 41 |.global |dollarsA|
|00004ec0| 6e 64 43 65 6e 74 73 0d | 73 65 74 20 6e 75 6d 62 |ndCents.|set numb|
|00004ed0| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 64 6f 6c 6c |erFormat| to doll|
|00004ee0| 61 72 73 41 6e 64 43 65 | 6e 74 73 0d 70 75 74 20 |arsAndCe|nts.put |
|00004ef0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|00004f00| 65 20 74 61 72 67 65 74 | 20 69 6e 74 6f 20 6e 72 |e target| into nr|
|00004f10| 0d 67 65 74 20 66 69 65 | 6c 64 20 6e 72 0d 61 64 |.get fie|ld nr.ad|
|00004f20| 64 20 30 20 74 6f 20 69 | 74 0d 70 75 74 20 69 74 |d 0 to i|t.put it|
|00004f30| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 6e 72 0d 65 | into fi|eld nr.e|
|00004f40| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 5c |nd close|Field..\|
|00004f50| 00 1a 02 00 00 d5 00 2d | 00 e5 00 58 00 02 00 00 |.......-|...X....|
|00004f60| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 55 6e 69 74 |........|....Unit|
|00004f70| 73 20 31 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |s 1..on |closeFie|
|00004f80| 6c 64 0d 73 65 74 75 6e | 69 74 46 6f 72 6d 61 74 |ld.setun|itFormat|
|00004f90| 0d 43 61 6c 63 4c 69 6e | 65 0d 65 6e 64 20 63 6c |.CalcLin|e.end cl|
|00004fa0| 6f 73 65 46 69 65 6c 64 | 00 00 00 28 00 1b 02 00 |oseField|...(....|
|00004fb0| 00 d5 00 57 00 e5 01 5a | 00 02 00 00 00 00 00 00 |...W...Z|........|
|00004fc0| 00 03 00 0a 00 00 00 0d | 49 74 65 6d 20 31 00 00 |........|Item 1..|
|00004fd0| 00 00 00 62 00 1c 02 00 | 00 d5 01 59 00 e5 01 9d |...b....|...Y....|
|00004fe0| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|00004ff0| 49 74 65 6d 20 50 72 69 | 63 65 20 31 00 00 6f 6e |Item Pri|ce 1..on|
|00005000| 20 63 6c 6f 73 65 46 69 | 65 6c 64 0d 73 65 74 44 | closeFi|eld.setD|
|00005010| 6f 6c 6c 61 72 46 6f 72 | 6d 61 74 0d 43 61 6c 63 |ollarFor|mat.Calc|
|00005020| 4c 69 6e 65 0d 65 6e 64 | 20 63 6c 6f 73 65 46 69 |Line.end| closeFi|
|00005030| 65 6c 64 00 00 da 00 1d | 02 01 00 d5 01 9c 00 e5 |eld.....|........|
|00005040| 01 e0 00 02 00 00 00 00 | ff ff 00 03 00 0a 00 00 |........|........|
|00005050| 00 0d 51 75 61 6e 69 74 | 79 20 50 72 69 63 65 20 |..Quanit|y Price |
|00005060| 31 00 00 6f 6e 20 63 6c | 6f 73 65 46 69 65 6c 64 |1..on cl|oseField|
|00005070| 0d 67 6c 6f 62 61 6c 20 | 64 6f 6c 6c 61 72 73 41 |.global |dollarsA|
|00005080| 6e 64 43 65 6e 74 73 0d | 73 65 74 20 6e 75 6d 62 |ndCents.|set numb|
|00005090| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 64 6f 6c 6c |erFormat| to doll|
|000050a0| 61 72 73 41 6e 64 43 65 | 6e 74 73 0d 70 75 74 20 |arsAndCe|nts.put |
|000050b0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|000050c0| 65 20 74 61 72 67 65 74 | 20 69 6e 74 6f 20 6e 72 |e target| into nr|
|000050d0| 0d 67 65 74 20 66 69 65 | 6c 64 20 6e 72 0d 61 64 |.get fie|ld nr.ad|
|000050e0| 64 20 30 20 74 6f 20 69 | 74 0d 70 75 74 20 69 74 |d 0 to i|t.put it|
|000050f0| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 6e 72 0d 65 | into fi|eld nr.e|
|00005100| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 5c |nd close|Field..\|
|00005110| 00 1e 02 00 00 e4 00 2d | 00 f4 00 58 00 02 00 00 |.......-|...X....|
|00005120| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 55 6e 69 74 |........|....Unit|
|00005130| 73 20 31 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |s 1..on |closeFie|
|00005140| 6c 64 0d 73 65 74 75 6e | 69 74 46 6f 72 6d 61 74 |ld.setun|itFormat|
|00005150| 0d 43 61 6c 63 4c 69 6e | 65 0d 65 6e 64 20 63 6c |.CalcLin|e.end cl|
|00005160| 6f 73 65 46 69 65 6c 64 | 00 00 00 28 00 1f 02 00 |oseField|...(....|
|00005170| 00 e4 00 57 00 f4 01 5a | 00 02 00 00 00 00 00 00 |...W...Z|........|
|00005180| 00 03 00 0a 00 00 00 0d | 49 74 65 6d 20 31 00 00 |........|Item 1..|
|00005190| 00 00 00 62 00 20 02 00 | 00 e4 01 59 00 f4 01 9d |...b. ..|...Y....|
|000051a0| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|000051b0| 49 74 65 6d 20 50 72 69 | 63 65 20 31 00 00 6f 6e |Item Pri|ce 1..on|
|000051c0| 20 63 6c 6f 73 65 46 69 | 65 6c 64 0d 73 65 74 44 | closeFi|eld.setD|
|000051d0| 6f 6c 6c 61 72 46 6f 72 | 6d 61 74 0d 43 61 6c 63 |ollarFor|mat.Calc|
|000051e0| 4c 69 6e 65 0d 65 6e 64 | 20 63 6c 6f 73 65 46 69 |Line.end| closeFi|
|000051f0| 65 6c 64 00 00 da 00 21 | 02 01 00 e4 01 9c 00 f4 |eld....!|........|
|00005200| 01 e0 00 02 00 00 00 00 | ff ff 00 03 00 0a 00 00 |........|........|
|00005210| 00 0d 51 75 61 6e 69 74 | 79 20 50 72 69 63 65 20 |..Quanit|y Price |
|00005220| 31 00 00 6f 6e 20 63 6c | 6f 73 65 46 69 65 6c 64 |1..on cl|oseField|
|00005230| 0d 67 6c 6f 62 61 6c 20 | 64 6f 6c 6c 61 72 73 41 |.global |dollarsA|
|00005240| 6e 64 43 65 6e 74 73 0d | 73 65 74 20 6e 75 6d 62 |ndCents.|set numb|
|00005250| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 64 6f 6c 6c |erFormat| to doll|
|00005260| 61 72 73 41 6e 64 43 65 | 6e 74 73 0d 70 75 74 20 |arsAndCe|nts.put |
|00005270| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|00005280| 65 20 74 61 72 67 65 74 | 20 69 6e 74 6f 20 6e 72 |e target| into nr|
|00005290| 0d 67 65 74 20 66 69 65 | 6c 64 20 6e 72 0d 61 64 |.get fie|ld nr.ad|
|000052a0| 64 20 30 20 74 6f 20 69 | 74 0d 70 75 74 20 69 74 |d 0 to i|t.put it|
|000052b0| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 6e 72 0d 65 | into fi|eld nr.e|
|000052c0| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 5c |nd close|Field..\|
|000052d0| 00 22 02 00 00 f3 00 2d | 01 03 00 58 00 02 00 00 |.".....-|...X....|
|000052e0| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 55 6e 69 74 |........|....Unit|
|000052f0| 73 20 31 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |s 1..on |closeFie|
|00005300| 6c 64 0d 73 65 74 75 6e | 69 74 46 6f 72 6d 61 74 |ld.setun|itFormat|
|00005310| 0d 43 61 6c 63 4c 69 6e | 65 0d 65 6e 64 20 63 6c |.CalcLin|e.end cl|
|00005320| 6f 73 65 46 69 65 6c 64 | 00 00 00 28 00 23 02 00 |oseField|...(.#..|
|00005330| 00 f3 00 57 01 03 01 5a | 00 02 00 00 00 00 00 00 |...W...Z|........|
|00005340| 00 03 00 0a 00 00 00 0d | 49 74 65 6d 20 31 00 00 |........|Item 1..|
|00005350| 00 00 00 62 00 24 02 00 | 00 f3 01 59 01 03 01 9d |...b.$..|...Y....|
|00005360| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|00005370| 49 74 65 6d 20 50 72 69 | 63 65 20 31 00 00 6f 6e |Item Pri|ce 1..on|
|00005380| 20 63 6c 6f 73 65 46 69 | 65 6c 64 0d 73 65 74 44 | closeFi|eld.setD|
|00005390| 6f 6c 6c 61 72 46 6f 72 | 6d 61 74 0d 43 61 6c 63 |ollarFor|mat.Calc|
|000053a0| 4c 69 6e 65 0d 65 6e 64 | 20 63 6c 6f 73 65 46 69 |Line.end| closeFi|
|000053b0| 65 6c 64 00 00 da 00 25 | 02 01 00 f3 01 9c 01 03 |eld....%|........|
|000053c0| 01 e0 00 02 00 00 00 00 | ff ff 00 03 00 0a 00 00 |........|........|
|000053d0| 00 0d 51 75 61 6e 69 74 | 79 20 50 72 69 63 65 20 |..Quanit|y Price |
|000053e0| 31 00 00 6f 6e 20 63 6c | 6f 73 65 46 69 65 6c 64 |1..on cl|oseField|
|000053f0| 0d 67 6c 6f 62 61 6c 20 | 64 6f 6c 6c 61 72 73 41 |.global |dollarsA|
|00005400| 6e 64 43 65 6e 74 73 0d | 73 65 74 20 6e 75 6d 62 |ndCents.|set numb|
|00005410| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 64 6f 6c 6c |erFormat| to doll|
|00005420| 61 72 73 41 6e 64 43 65 | 6e 74 73 0d 70 75 74 20 |arsAndCe|nts.put |
|00005430| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|00005440| 65 20 74 61 72 67 65 74 | 20 69 6e 74 6f 20 6e 72 |e target| into nr|
|00005450| 0d 67 65 74 20 66 69 65 | 6c 64 20 6e 72 0d 61 64 |.get fie|ld nr.ad|
|00005460| 64 20 30 20 74 6f 20 69 | 74 0d 70 75 74 20 69 74 |d 0 to i|t.put it|
|00005470| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 6e 72 0d 65 | into fi|eld nr.e|
|00005480| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 5c |nd close|Field..\|
|00005490| 00 26 02 00 01 02 00 2d | 01 12 00 58 00 02 00 00 |.&.....-|...X....|
|000054a0| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 55 6e 69 74 |........|....Unit|
|000054b0| 73 20 31 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |s 1..on |closeFie|
|000054c0| 6c 64 0d 73 65 74 75 6e | 69 74 46 6f 72 6d 61 74 |ld.setun|itFormat|
|000054d0| 0d 43 61 6c 63 4c 69 6e | 65 0d 65 6e 64 20 63 6c |.CalcLin|e.end cl|
|000054e0| 6f 73 65 46 69 65 6c 64 | 00 00 00 28 00 27 02 00 |oseField|...(.'..|
|000054f0| 01 02 00 57 01 12 01 5a | 00 02 00 00 00 00 00 00 |...W...Z|........|
|00005500| 00 03 00 0a 00 00 00 0d | 49 74 65 6d 20 31 00 00 |........|Item 1..|
|00005510| 00 00 00 62 00 28 02 00 | 01 02 01 59 01 12 01 9d |...b.(..|...Y....|
|00005520| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|00005530| 49 74 65 6d 20 50 72 69 | 63 65 20 31 00 00 6f 6e |Item Pri|ce 1..on|
|00005540| 20 63 6c 6f 73 65 46 69 | 65 6c 64 0d 73 65 74 44 | closeFi|eld.setD|
|00005550| 6f 6c 6c 61 72 46 6f 72 | 6d 61 74 0d 43 61 6c 63 |ollarFor|mat.Calc|
|00005560| 4c 69 6e 65 0d 65 6e 64 | 20 63 6c 6f 73 65 46 69 |Line.end| closeFi|
|00005570| 65 6c 64 00 00 da 00 29 | 02 01 01 02 01 9c 01 12 |eld....)|........|
|00005580| 01 e0 00 02 00 00 00 00 | ff ff 00 03 00 0a 00 00 |........|........|
|00005590| 00 0d 51 75 61 6e 69 74 | 79 20 50 72 69 63 65 20 |..Quanit|y Price |
|000055a0| 31 00 00 6f 6e 20 63 6c | 6f 73 65 46 69 65 6c 64 |1..on cl|oseField|
|000055b0| 0d 67 6c 6f 62 61 6c 20 | 64 6f 6c 6c 61 72 73 41 |.global |dollarsA|
|000055c0| 6e 64 43 65 6e 74 73 0d | 73 65 74 20 6e 75 6d 62 |ndCents.|set numb|
|000055d0| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 64 6f 6c 6c |erFormat| to doll|
|000055e0| 61 72 73 41 6e 64 43 65 | 6e 74 73 0d 70 75 74 20 |arsAndCe|nts.put |
|000055f0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|00005600| 65 20 74 61 72 67 65 74 | 20 69 6e 74 6f 20 6e 72 |e target| into nr|
|00005610| 0d 67 65 74 20 66 69 65 | 6c 64 20 6e 72 0d 61 64 |.get fie|ld nr.ad|
|00005620| 64 20 30 20 74 6f 20 69 | 74 0d 70 75 74 20 69 74 |d 0 to i|t.put it|
|00005630| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 6e 72 0d 65 | into fi|eld nr.e|
|00005640| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 5c |nd close|Field..\|
|00005650| 00 2a 02 00 01 11 00 2d | 01 21 00 58 00 02 00 00 |.*.....-|.!.X....|
|00005660| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 55 6e 69 74 |........|....Unit|
|00005670| 73 20 31 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |s 1..on |closeFie|
|00005680| 6c 64 0d 73 65 74 75 6e | 69 74 46 6f 72 6d 61 74 |ld.setun|itFormat|
|00005690| 0d 43 61 6c 63 4c 69 6e | 65 0d 65 6e 64 20 63 6c |.CalcLin|e.end cl|
|000056a0| 6f 73 65 46 69 65 6c 64 | 00 00 00 28 00 2b 02 00 |oseField|...(.+..|
|000056b0| 01 11 00 57 01 21 01 5a | 00 02 00 00 00 00 00 00 |...W.!.Z|........|
|000056c0| 00 03 00 0a 00 00 00 0d | 49 74 65 6d 20 31 00 00 |........|Item 1..|
|000056d0| 00 00 00 62 00 2c 02 00 | 01 11 01 59 01 21 01 9d |...b.,..|...Y.!..|
|000056e0| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|000056f0| 49 74 65 6d 20 50 72 69 | 63 65 20 31 00 00 6f 6e |Item Pri|ce 1..on|
|00005700| 20 63 6c 6f 73 65 46 69 | 65 6c 64 0d 73 65 74 44 | closeFi|eld.setD|
|00005710| 6f 6c 6c 61 72 46 6f 72 | 6d 61 74 0d 43 61 6c 63 |ollarFor|mat.Calc|
|00005720| 4c 69 6e 65 0d 65 6e 64 | 20 63 6c 6f 73 65 46 69 |Line.end| closeFi|
|00005730| 65 6c 64 00 00 da 00 2d | 02 01 01 11 01 9c 01 21 |eld....-|.......!|
|00005740| 01 e0 00 02 00 00 00 00 | ff ff 00 03 00 0a 00 00 |........|........|
|00005750| 00 0d 51 75 61 6e 69 74 | 79 20 50 72 69 63 65 20 |..Quanit|y Price |
|00005760| 31 00 00 6f 6e 20 63 6c | 6f 73 65 46 69 65 6c 64 |1..on cl|oseField|
|00005770| 0d 67 6c 6f 62 61 6c 20 | 64 6f 6c 6c 61 72 73 41 |.global |dollarsA|
|00005780| 6e 64 43 65 6e 74 73 0d | 73 65 74 20 6e 75 6d 62 |ndCents.|set numb|
|00005790| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 64 6f 6c 6c |erFormat| to doll|
|000057a0| 61 72 73 41 6e 64 43 65 | 6e 74 73 0d 70 75 74 20 |arsAndCe|nts.put |
|000057b0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 74 68 |the numb|er of th|
|000057c0| 65 20 74 61 72 67 65 74 | 20 69 6e 74 6f 20 6e 72 |e target| into nr|
|000057d0| 0d 67 65 74 20 66 69 65 | 6c 64 20 6e 72 0d 61 64 |.get fie|ld nr.ad|
|000057e0| 64 20 30 20 74 6f 20 69 | 74 0d 70 75 74 20 69 74 |d 0 to i|t.put it|
|000057f0| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 6e 72 0d 65 | into fi|eld nr.e|
|00005800| 6e 64 20 63 6c 6f 73 65 | 46 69 65 6c 64 00 00 d4 |nd close|Field...|
|00005810| 00 31 02 01 01 20 01 9c | 01 30 01 e0 00 00 00 00 |.1... ..|.0......|
|00005820| 00 00 ff ff 00 03 00 0a | 00 00 00 0d 53 75 62 74 |........|....Subt|
|00005830| 6f 74 61 6c 00 00 6f 6e | 20 63 6c 6f 73 65 46 69 |otal..on| closeFi|
|00005840| 65 6c 64 0d 67 6c 6f 62 | 61 6c 20 64 6f 6c 6c 61 |eld.glob|al dolla|
|00005850| 72 73 41 6e 64 43 65 6e | 74 73 0d 73 65 74 20 6e |rsAndCen|ts.set n|
|00005860| 75 6d 62 65 72 46 6f 72 | 6d 61 74 20 74 6f 20 64 |umberFor|mat to d|
|00005870| 6f 6c 6c 61 72 73 41 6e | 64 43 65 6e 74 73 0d 70 |ollarsAn|dCents.p|
|00005880| 75 74 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 |ut the n|umber of|
|00005890| 20 74 68 65 20 74 61 72 | 67 65 74 20 69 6e 74 6f | the tar|get into|
|000058a0| 20 6e 72 0d 67 65 74 20 | 66 69 65 6c 64 20 6e 72 | nr.get |field nr|
|000058b0| 0d 61 64 64 20 30 20 74 | 6f 20 69 74 0d 70 75 74 |.add 0 t|o it.put|
|000058c0| 20 69 74 20 69 6e 74 6f | 20 66 69 65 6c 64 20 6e | it into| field n|
|000058d0| 72 0d 65 6e 64 20 63 6c | 6f 73 65 46 69 65 6c 64 |r.end cl|oseField|
|000058e0| 00 00 00 60 00 32 02 00 | 01 2f 00 84 01 3f 00 c3 |...`.2..|./...?..|
|000058f0| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|00005900| 53 68 69 70 70 69 6e 67 | 00 00 6f 6e 20 63 6c 6f |Shipping|..on clo|
|00005910| 73 65 46 69 65 6c 64 0d | 73 65 74 44 6f 6c 6c 61 |seField.|setDolla|
|00005920| 72 46 6f 72 6d 61 74 0d | 63 61 6c 63 54 6f 74 61 |rFormat.|calcTota|
|00005930| 6c 0d 65 6e 64 20 63 6c | 6f 73 65 46 69 65 6c 64 |l.end cl|oseField|
|00005940| 00 00 00 5e 00 33 02 80 | 01 20 01 2e 01 30 01 5a |...^.3..|. ...0.Z|
|00005950| 00 02 00 00 00 00 ff ff | 00 03 00 0a 00 00 00 0d |........|........|
|00005960| 53 61 6c 65 73 20 54 61 | 78 20 52 61 74 65 00 00 |Sales Ta|x Rate..|
|00005970| 6f 6e 20 63 6c 6f 73 65 | 46 69 65 6c 64 0d 63 61 |on close|Field.ca|
|00005980| 6c 63 54 61 78 0d 63 61 | 6c 63 54 6f 74 61 6c 0d |lcTax.ca|lcTotal.|
|00005990| 65 6e 64 20 63 6c 6f 73 | 65 46 69 65 6c 64 00 00 |end clos|eField..|
|000059a0| 00 2a 00 34 02 01 01 2f | 01 16 01 3f 01 5a 00 02 |.*.4.../|...?.Z..|
|000059b0| 00 00 00 00 ff ff 00 03 | 00 0a 00 00 00 0d 53 61 |........|......Sa|
|000059c0| 6c 65 73 20 54 61 78 00 | 00 00 00 26 00 35 02 01 |les Tax.|...&.5..|
|000059d0| 01 2f 01 9c 01 3f 01 e0 | 00 00 00 00 00 00 ff ff |./...?..|........|
|000059e0| 00 03 00 0a 00 00 00 0d | 54 6f 74 61 6c 00 00 00 |........|Total...|
|000059f0| 00 26 00 37 02 00 01 3e | 00 57 01 4e 00 c3 00 02 |.&.7...>|.W.N....|
|00005a00| 00 00 00 00 00 00 00 03 | 00 0a 00 00 00 0d 54 65 |........|......Te|
|00005a10| 72 6d 73 00 00 00 00 66 | 00 38 02 00 01 3e 01 16 |rms....f|.8...>..|
|00005a20| 01 4e 01 5a 00 02 00 00 | 00 00 ff ff 00 03 00 0a |.N.Z....|........|
|00005a30| 00 00 00 0d 41 6d 6f 75 | 6e 74 20 52 65 63 65 69 |....Amou|nt Recei|
|00005a40| 76 65 64 00 00 6f 6e 20 | 63 6c 6f 73 65 46 69 65 |ved..on |closeFie|
|00005a50| 6c 64 0d 53 65 74 44 6f | 6c 6c 61 72 46 6f 72 6d |ld.SetDo|llarForm|
|00005a60| 61 74 0d 43 61 6c 63 54 | 6f 74 61 6c 0d 65 6e 64 |at.CalcT|otal.end|
|00005a70| 20 63 6c 6f 73 65 46 69 | 65 6c 64 00 00 2c 00 39 | closeFi|eld..,.9|
|00005a80| 02 01 01 3e 01 9c 01 4e | 01 e0 00 00 00 00 00 00 |...>...N|........|
|00005a90| ff ff 00 03 00 0a 00 00 | 00 0d 41 6d 6f 75 6e 74 |........|..Amount|
|00005aa0| 20 44 75 65 00 00 00 00 | 01 98 00 3a 01 00 01 2d | Due....|...:...-|
|00005ab0| 00 d3 01 3f 00 e5 00 05 | 00 00 00 00 00 01 00 00 |...?....|........|
|00005ac0| 00 0c 00 00 00 10 53 61 | 6c 65 73 20 54 61 78 00 |......Sa|les Tax.|
|00005ad0| 00 6f 6e 20 6d 6f 75 73 | 65 55 70 0d 67 6c 6f 62 |.on mous|eUp.glob|
|00005ae0| 61 6c 20 64 6f 6c 6c 61 | 72 73 41 6e 64 43 65 6e |al dolla|rsAndCen|
|00005af0| 74 73 0d 73 65 74 20 74 | 68 65 20 6e 75 6d 62 65 |ts.set t|he numbe|
|00005b00| 72 46 6f 72 6d 61 74 20 | 74 6f 20 64 6f 6c 6c 61 |rFormat |to dolla|
|00005b10| 72 73 41 6e 64 43 65 6e | 74 73 0d 70 75 74 20 74 |rsAndCen|ts.put t|
|00005b20| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 74 68 65 |he numbe|r of the|
|00005b30| 20 74 61 72 67 65 74 20 | 69 6e 74 6f 20 6e 72 0d | target |into nr.|
|00005b40| 70 75 74 20 6e 6f 74 20 | 68 69 67 68 6c 69 67 68 |put not |highligh|
|00005b50| 74 20 6f 66 20 62 6b 67 | 6e 64 20 62 75 74 74 6f |t of bkg|nd butto|
|00005b60| 6e 20 6e 72 20 69 6e 74 | 6f 20 74 61 78 61 62 6c |n nr int|o taxabl|
|00005b70| 65 0d 73 65 74 20 68 69 | 67 68 6c 69 67 68 74 20 |e.set hi|ghlight |
|00005b80| 6f 66 20 62 6b 67 6e 64 | 20 62 75 74 74 6f 6e 20 |of bkgnd| button |
|00005b90| 6e 72 20 74 6f 20 74 61 | 78 61 62 6c 65 0d 69 66 |nr to ta|xable.if|
|00005ba0| 20 74 61 78 61 62 6c 65 | 20 74 68 65 6e 0d 73 68 | taxable| then.sh|
|00005bb0| 6f 77 20 66 69 65 6c 64 | 20 22 53 61 6c 65 73 20 |ow field| "Sales |
|00005bc0| 54 61 78 20 52 61 74 65 | 22 0d 63 61 6c 63 54 61 |Tax Rate|".calcTa|
|00005bd0| 78 0d 65 6c 73 65 0d 68 | 69 64 65 20 66 69 65 6c |x.else.h|ide fiel|
|00005be0| 64 20 22 53 61 6c 65 73 | 20 54 61 78 20 52 61 74 |d "Sales| Tax Rat|
|00005bf0| 65 22 0d 70 75 74 20 30 | 20 69 6e 74 6f 20 69 74 |e".put 0| into it|
|00005c00| 0d 70 75 74 20 69 74 2b | 30 20 69 6e 74 6f 20 66 |.put it+|0 into f|
|00005c10| 69 65 6c 64 20 22 53 61 | 6c 65 73 20 54 61 78 22 |ield "Sa|les Tax"|
|00005c20| 0d 65 6e 64 20 69 66 0d | 63 61 6c 63 54 6f 74 61 |.end if.|calcTota|
|00005c30| 6c 0d 65 6e 64 20 6d 6f | 75 73 65 55 70 0d 00 00 |l.end mo|useUp...|
|00005c40| 01 58 00 3b 01 00 01 2d | 00 46 01 3f 00 58 40 05 |.X.;...-|.F.?.X@.|
|00005c50| 00 00 00 00 00 01 00 00 | 00 0c 00 00 00 10 53 68 |........|......Sh|
|00005c60| 69 70 70 69 6e 67 00 00 | 6f 6e 20 6d 6f 75 73 65 |ipping..|on mouse|
|00005c70| 55 70 0d 67 6c 6f 62 61 | 6c 20 64 6f 6c 6c 61 72 |Up.globa|l dollar|
|00005c80| 73 41 6e 64 43 65 6e 74 | 73 0d 73 65 74 20 74 68 |sAndCent|s.set th|
|00005c90| 65 20 6e 75 6d 62 65 72 | 46 6f 72 6d 61 74 20 74 |e number|Format t|
|00005ca0| 6f 20 64 6f 6c 6c 61 72 | 73 41 6e 64 43 65 6e 74 |o dollar|sAndCent|
|00005cb0| 73 0d 70 75 74 20 74 68 | 65 20 6e 75 6d 62 65 72 |s.put th|e number|
|00005cc0| 20 6f 66 20 74 68 65 20 | 74 61 72 67 65 74 20 69 | of the |target i|
|00005cd0| 6e 74 6f 20 6e 72 0d 70 | 75 74 20 6e 6f 74 20 68 |nto nr.p|ut not h|
|00005ce0| 69 67 68 6c 69 67 68 74 | 20 6f 66 20 62 6b 67 6e |ighlight| of bkgn|
|00005cf0| 64 20 62 75 74 74 6f 6e | 20 6e 72 20 69 6e 74 6f |d button| nr into|
|00005d00| 20 73 68 69 70 70 69 6e | 67 0d 73 65 74 20 68 69 | shippin|g.set hi|
|00005d10| 67 68 6c 69 67 68 74 20 | 6f 66 20 62 6b 67 6e 64 |ghlight |of bkgnd|
|00005d20| 20 62 75 74 74 6f 6e 20 | 6e 72 20 74 6f 20 73 68 | button |nr to sh|
|00005d30| 69 70 70 69 6e 67 0d 69 | 66 20 73 68 69 70 70 69 |ipping.i|f shippi|
|00005d40| 6e 67 20 74 68 65 6e 0d | 73 68 6f 77 20 66 69 65 |ng then.|show fie|
|00005d50| 6c 64 20 22 53 68 69 70 | 70 69 6e 67 22 0d 65 6c |ld "Ship|ping".el|
|00005d60| 73 65 0d 68 69 64 65 20 | 66 69 65 6c 64 20 22 53 |se.hide |field "S|
|00005d70| 68 69 70 70 69 6e 67 22 | 0d 65 6e 64 20 69 66 0d |hipping"|.end if.|
|00005d80| 63 61 6c 63 54 6f 74 61 | 6c 0d 65 6e 64 20 6d 6f |calcTota|l.end mo|
|00005d90| 75 73 65 55 70 0d 00 00 | 01 72 00 3c 01 00 00 06 |useUp...|.r.<....|
|00005da0| 00 3e 00 29 00 62 00 00 | 00 00 03 ef 00 01 00 00 |.>.).b..|........|
|00005db0| 00 0c 00 00 00 10 50 72 | 69 6e 74 00 00 6f 6e 20 |......Pr|int..on |
|00005dc0| 6d 6f 75 73 65 55 70 0d | 67 6c 6f 62 61 6c 20 69 |mouseUp.|global i|
|00005dd0| 6e 76 6f 69 63 65 43 6f | 70 69 65 73 2c 73 65 6c |nvoiceCo|pies,sel|
|00005de0| 6c 54 6f 46 69 65 6c 64 | 2c 66 69 72 73 74 4c 69 |lToField|,firstLi|
|00005df0| 6e 65 46 69 65 6c 64 2c | 6c 61 73 74 4c 69 6e 65 |neField,|lastLine|
|00005e00| 46 69 65 6c 64 2c c2 0d | 6c 65 61 64 69 6e 67 5a |Field,..|leadingZ|
|00005e10| 65 72 6f 73 2c 70 72 69 | 6e 74 69 6e 67 49 6e 76 |eros,pri|ntingInv|
|00005e20| 6f 69 63 65 0d 72 65 70 | 65 61 74 20 77 69 74 68 |oice.rep|eat with|
|00005e30| 20 69 3d 31 20 74 6f 20 | 74 68 65 20 6e 75 6d 62 | i=1 to |the numb|
|00005e40| 65 72 20 6f 66 20 62 6b | 67 6e 64 20 62 75 74 74 |er of bk|gnd butt|
|00005e50| 6f 6e 73 0d 68 69 64 65 | 20 62 6b 67 6e 64 20 62 |ons.hide| bkgnd b|
|00005e60| 75 74 74 6f 6e 20 69 0d | 65 6e 64 20 72 65 70 65 |utton i.|end repe|
|00005e70| 61 74 0d 70 75 74 20 74 | 72 75 65 20 69 6e 74 6f |at.put t|rue into|
|00005e80| 20 70 72 69 6e 74 69 6e | 67 49 6e 76 6f 69 63 65 | printin|gInvoice|
|00005e90| 0d 72 65 70 65 61 74 20 | 77 69 74 68 20 69 3d 31 |.repeat |with i=1|
|00005ea0| 20 74 6f 20 69 6e 76 6f | 69 63 65 43 6f 70 69 65 | to invo|iceCopie|
|00005eb0| 73 0d 64 6f 6d 65 6e 75 | 20 22 50 72 69 6e 74 20 |s.domenu| "Print |
|00005ec0| 43 61 72 64 22 0d 65 6e | 64 20 72 65 70 65 61 74 |Card".en|d repeat|
|00005ed0| 0d 70 75 74 20 66 61 6c | 73 65 20 69 6e 74 6f 20 |.put fal|se into |
|00005ee0| 70 72 69 6e 74 69 6e 67 | 49 6e 76 6f 69 63 65 0d |printing|Invoice.|
|00005ef0| 73 68 6f 77 42 75 74 74 | 6f 6e 73 0d 65 6e 64 20 |showButt|ons.end |
|00005f00| 6d 6f 75 73 65 55 70 0d | 00 00 00 5e 00 3d 01 00 |mouseUp.|...^.=..|
|00005f10| 00 00 01 e2 00 1b 02 00 | 00 00 00 00 4e 82 00 01 |........|....N...|
|00005f20| 00 00 00 0c 00 00 00 10 | 48 6f 6d 65 00 00 6f 6e |........|Home..on|
|00005f30| 20 6d 6f 75 73 65 55 70 | 0d 76 69 73 75 61 6c 20 | mouseUp|.visual |
|00005f40| 65 66 66 65 63 74 20 69 | 72 69 73 20 63 6c 6f 73 |effect i|ris clos|
|00005f50| 65 0d 67 6f 20 68 6f 6d | 65 0d 65 6e 64 20 6d 6f |e.go hom|e.end mo|
|00005f60| 75 73 65 55 70 0d 00 00 | 00 50 00 41 01 00 00 01 |useUp...|.P.A....|
|00005f70| 01 a1 00 2e 01 d2 a0 00 | 00 00 2d 7d 00 01 00 00 |........|..-}....|
|00005f80| 00 0c 00 00 00 10 43 75 | 73 74 6f 6d 65 72 00 00 |......Cu|stomer..|
|00005f90| 6f 6e 20 6d 6f 75 73 65 | 55 70 0d 72 65 74 75 72 |on mouse|Up.retur|
|00005fa0| 6e 54 6f 43 75 73 74 6f | 6d 65 72 0d 65 6e 64 20 |nToCusto|mer.end |
|00005fb0| 6d 6f 75 73 65 55 70 00 | 00 58 00 42 02 01 00 41 |mouseUp.|.X.B...A|
|00005fc0| 00 ed 00 52 01 25 00 00 | 00 00 00 00 00 01 00 03 |...R.%..|........|
|00005fd0| 00 0a 01 00 00 0d 43 75 | 73 74 6f 6d 65 72 20 4e |......Cu|stomer N|
|00005fe0| 75 6d 62 65 72 00 00 6f | 6e 20 6d 6f 75 73 65 55 |umber..o|n mouseU|
|00005ff0| 70 0d 72 65 74 75 72 6e | 54 6f 43 75 73 74 6f 6d |p.return|ToCustom|
|00006000| 65 72 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 00 00 |er.end m|ouseUp..|
|00006010| 01 5c 00 44 01 00 01 33 | 00 00 01 4b 00 19 20 00 |.\.D...3|...K.. .|
|00006020| 00 00 03 f6 00 01 00 00 | 00 0c 00 00 00 10 4c 65 |........|......Le|
|00006030| 66 74 20 41 72 72 6f 77 | 00 00 6f 6e 20 6d 6f 75 |ft Arrow|..on mou|
|00006040| 73 65 55 70 0d 2d 2d 20 | 61 73 73 75 6d 65 73 20 |seUp.-- |assumes |
|00006050| 6f 6e 6c 79 20 49 6e 76 | 6f 69 63 65 20 63 61 72 |only Inv|oice car|
|00006060| 64 73 20 62 65 74 77 65 | 65 6e 20 49 6e 76 6f 69 |ds betwe|en Invoi|
|00006070| 63 65 20 61 6e 64 20 43 | 75 73 74 6f 6d 65 72 20 |ce and C|ustomer |
|00006080| 4d 61 73 74 65 72 73 0d | 67 65 74 20 74 68 65 20 |Masters.|get the |
|00006090| 6e 75 6d 62 65 72 20 6f | 66 20 70 72 65 76 69 6f |number o|f previo|
|000060a0| 75 73 20 63 61 72 64 0d | 69 66 20 69 74 20 3e 20 |us card.|if it > |
|000060b0| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 61 |the numb|er of ca|
|000060c0| 72 64 20 22 49 6e 76 6f | 69 63 65 20 4d 61 73 74 |rd "Invo|ice Mast|
|000060d0| 65 72 22 20 74 68 65 6e | 0d 67 6f 20 70 72 65 76 |er" then|.go prev|
|000060e0| 69 6f 75 73 20 63 61 72 | 64 0d 65 6c 73 65 0d 67 |ious car|d.else.g|
|000060f0| 65 74 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 |et the n|umber of|
|00006100| 20 63 61 72 64 20 22 43 | 75 73 74 6f 6d 65 72 20 | card "C|ustomer |
|00006110| 4d 61 73 74 65 72 22 0d | 69 66 20 69 74 2d 31 20 |Master".|if it-1 |
|00006120| 3e 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |> the nu|mber of |
|00006130| 63 61 72 64 20 22 49 6e | 76 6f 69 63 65 20 4d 61 |card "In|voice Ma|
|00006140| 73 74 65 72 22 20 74 68 | 65 6e 20 67 6f 20 63 61 |ster" th|en go ca|
|00006150| 72 64 20 69 74 2d 31 0d | 65 6e 64 20 69 66 0d 65 |rd it-1.|end if.e|
|00006160| 6e 64 20 6d 6f 75 73 65 | 55 70 0d 00 01 56 00 45 |nd mouse|Up...V.E|
|00006170| 01 00 01 33 01 e7 01 4b | 02 00 20 00 00 00 03 f5 |...3...K|.. .....|
|00006180| 00 01 00 00 00 0c 00 00 | 00 10 52 69 67 68 74 20 |........|..Right |
|00006190| 41 72 72 6f 77 00 00 6f | 6e 20 6d 6f 75 73 65 55 |Arrow..o|n mouseU|
|000061a0| 70 0d 2d 2d 20 61 73 73 | 75 6d 65 73 20 6f 6e 6c |p.-- ass|umes onl|
|000061b0| 79 20 49 6e 76 6f 69 63 | 65 20 63 61 72 64 73 20 |y Invoic|e cards |
|000061c0| 62 65 74 77 65 65 6e 20 | 49 6e 76 6f 69 63 65 20 |between |Invoice |
|000061d0| 61 6e 64 20 43 75 73 74 | 6f 6d 65 72 20 4d 61 73 |and Cust|omer Mas|
|000061e0| 74 65 72 73 0d 67 65 74 | 20 74 68 65 20 6e 75 6d |ters.get| the num|
|000061f0| 62 65 72 20 6f 66 20 6e | 65 78 74 20 63 61 72 64 |ber of n|ext card|
|00006200| 0d 69 66 20 69 74 20 3c | 20 74 68 65 20 6e 75 6d |.if it <| the num|
|00006210| 62 65 72 20 6f 66 20 63 | 61 72 64 20 22 43 75 73 |ber of c|ard "Cus|
|00006220| 74 6f 6d 65 72 20 4d 61 | 73 74 65 72 22 20 74 68 |tomer Ma|ster" th|
|00006230| 65 6e 0d 67 6f 20 6e 65 | 78 74 20 63 61 72 64 0d |en.go ne|xt card.|
|00006240| 65 6c 73 65 0d 67 65 74 | 20 74 68 65 20 6e 75 6d |else.get| the num|
|00006250| 62 65 72 20 6f 66 20 63 | 61 72 64 20 22 49 6e 76 |ber of c|ard "Inv|
|00006260| 6f 69 63 65 20 4d 61 73 | 74 65 72 22 0d 69 66 20 |oice Mas|ter".if |
|00006270| 69 74 2b 31 20 3c 20 74 | 68 65 20 6e 75 6d 62 65 |it+1 < t|he numbe|
|00006280| 72 20 6f 66 20 63 61 72 | 64 20 22 43 75 73 74 6f |r of car|d "Custo|
|00006290| 6d 65 72 20 4d 61 73 74 | 65 72 22 20 74 68 65 6e |mer Mast|er" then|
|000062a0| 20 67 6f 20 63 61 72 64 | 20 69 74 2b 31 0d 65 6e | go card| it+1.en|
|000062b0| 64 20 69 66 0d 65 6e 64 | 20 6d 6f 75 73 65 55 70 |d if.end| mouseUp|
|000062c0| 0d 00 01 00 00 46 01 00 | 00 00 00 00 00 2e 00 35 |.....F..|.......5|
|000062d0| 80 00 00 00 03 fa 00 01 | 00 00 00 0c 00 00 00 10 |........|........|
|000062e0| 44 65 6c 65 74 65 20 49 | 6e 76 2e 00 00 6f 6e 20 |Delete I|nv...on |
|000062f0| 6d 6f 75 73 65 55 70 0d | 67 6c 6f 62 61 6c 20 64 |mouseUp.|global d|
|00006300| 65 6c 65 74 65 46 6c 61 | 67 0d 69 66 20 63 68 65 |eleteFla|g.if che|
|00006310| 63 6b 49 6e 76 6f 69 63 | 65 4d 61 73 74 65 72 28 |ckInvoic|eMaster(|
|00006320| 29 20 74 68 65 6e 20 65 | 78 69 74 20 6d 6f 75 73 |) then e|xit mous|
|00006330| 65 55 70 0d 70 75 74 20 | 22 49 6e 76 6f 69 63 65 |eUp.put |"Invoice|
|00006340| 22 20 69 6e 74 6f 20 64 | 65 6c 65 74 65 46 6c 61 |" into d|eleteFla|
|00006350| 67 0d 70 75 74 20 22 43 | 22 26 26 66 69 65 6c 64 |g.put "C|"&&field|
|00006360| 20 22 43 75 73 74 6f 6d | 65 72 20 4e 75 6d 62 65 | "Custom|er Numbe|
|00006370| 72 22 20 69 6e 74 6f 20 | 63 75 73 74 6f 6d 65 72 |r" into |customer|
|00006380| 43 61 72 64 0d 64 6f 4d | 65 6e 75 20 22 44 65 6c |Card.doM|enu "Del|
|00006390| 65 74 65 20 43 61 72 64 | 22 0d 70 75 74 20 65 6d |ete Card|".put em|
|000063a0| 70 74 79 20 69 6e 74 6f | 20 64 65 6c 65 74 65 46 |pty into| deleteF|
|000063b0| 6c 61 67 0d 65 6e 64 20 | 6d 6f 75 73 65 55 70 0d |lag.end |mouseUp.|
|000063c0| 00 00 00 58 00 47 01 00 | 00 1a 01 e2 00 35 02 00 |...X.G..|.....5..|
|000063d0| 20 00 00 00 77 5d 00 01 | 00 00 00 0c 00 00 00 10 | ...w]..|........|
|000063e0| 54 69 74 6c 65 20 43 61 | 72 64 00 00 6f 6e 20 6d |Title Ca|rd..on m|
|000063f0| 6f 75 73 65 55 70 0d 67 | 6f 20 63 61 72 64 20 22 |ouseUp.g|o card "|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.